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Chapter  1 


Introduction 


Batch  LCAP2  (Linear  Controls  Analysis  Program)  is  a  FORTRAN  program  which  provides  the 
controls  analyst  with  a  set  of  easy  to  use  FORTRAN  subroutines  which  implements  classical  SISO 
control  analysis  techniques  such  as  transfer  function  evaluation,  transfer  function  algebra,  frequency 
response,  root  locus,  inverse  time  response,  and  sampled-data  transforms.  It  can  handle  continuous 
systems  and  continuous-discrete  multirate  systems  with  the  use  of  s,  z,  and  w  transforms.  Recent 
additions  to  LCAP2  include  (1)  the  capability  for  connecting  transfer  function  blocks  for  both 
continuous  and  continuous-discrete  multirate  systems  and  (2)  a  precompiler  to  aid  the  user  in 
writing  FORTRAN  code.  The  methodology  used  for  connecting  transfer  function  blocks  takes 
into  consideration  the  dimensionality  problem  associated  with  the  use  of  nondynamic  blocks  or 
algebraic  variables  used  in  modeling  the  connection  of  dynamic  blocks.  In  the  formulation  of  the 
system  matrix  used  in  LCAP2,  the  dimension  of  the  system  matrix  is  not  increased  bv  the  use  of 
nondynamic  blocks.  The  automated  analysis  of  continuous- discrete  multirate  systems  modeled  by 
a  connection  of  transfer  function  blocks  uses  the  Kalman- Bertram  state  space  method. 


1.1  Background 


The  original  version  of  this  program,  LCAP  [1],  first  developed  in  the  late  1960’s  in  support  of 
the  analysis  of  the  Titan  IIIC  launch  vehicle  digital  autopilot,  provided  the  controls  analyst  with 
a  tool  for  analyzing  complex  continuous  and  continuous-discrete  systems  using  classical  transform 
methods.  The  key  features  of  this  program  were  the  ability  to  (l)  compute  z  and  w  transforms  and 
to  express  them  as  rational  functions,  (2)  perform  transfer  function  algebra,  (3)  evaluate  transfer 
functions  using  Cramer’s  method,  and  (4)  specify  control  analysis  functions  such  as  frequency 
response,  root  locus,  or  time  response  with  simple  commands. 

Use  of  this  program  consisted  of  preparing  an  input  card  deck  in  which  only  numbers  could  be 
assigned  to  input  variable;  While  capable  of  analyzing  the  job  at  hand,  it  soon  became  apparent 
that  the  program  would  be  more  flexible  and  useful  if  the  user  could  enter  and  manipulate  algebraic 
expressions  as  well  as  numeric  ''-dues  for  the  input  variables.  This  flexibility  could  only  be 
provided  if  either  (1)  a  highe;  h  -i  user’s  language  was  developed  or  (2)  the  user  was  required  to 
write  his/her  own  FORTRA*  ■  gram.  The  latter  method  was  chosen  and  program  LCAP2  [2] 
was  developed  in  the  late  1970’s  Ail  the  commands  in  LCAP  were  implemented  so  that  they  could 
be  easdv  invoked  in  LCAP2  by  -  ..pie  FORTRAN  CALL  statements.  Program  LCAP2  is  thus 
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a  user  written  FORTRAN  program  utilizing  the  LCAP2  Subroutine  Library.  All  the  FORTRAN 
language  facilities  such  as  DO  LOOPs,  GO  TOs,  user-written  SUBROUTINES  and  FUNCTIONS, 
etc.,  can  be  utilized  to  develop  a  customized  control  analysis  program  for  specific  projects. 

As  the  complexity  and  degree  of  the  systems  being  analyzed  by  LCAP2  grew,  two  important  issues 
had  to  be  addressed.  They  were  (l)  computational  accuracy  and  (2)  ease  in  setting  up  an  analysis. 
Up  until  1987,  LCAP2  could  only  handle  transfer  functions  which  were  less  that  50-th  order.  For 
continuous  systems,  many  different  control  systems  were  analyzed  without  computational  problems. 
The  setup  effort  for  some  of  the  higher  order  continuous  systems  were  more  complex  but.  were 
manageable.  For  discrete  systems,  computational  accuracy  has  always  been  a  factor  for  systems 
greater  than  10~20-th  degree  if  an  analysis  were  performed  in  the  z-plane  using  transfer  function 
algebra.1  The  usual  practice  to  avoid  this  type  of  inaccuracy  is  to  analyze  discrete  systems  in  the 
w-plane  instead  of  the  z-plane.  This  method  of  analysis  of  discrete  systems  has  been  successfully 
applied  to  many  different  single  rate  systems  and  to  several  multirate  systems. 

For  more  complex  multirate  systems  in  which  (1)  the  ratio  of  the  sampling  rates  are  not  small 
integers  and/or  (2)  when  there  are  too  many  feedback  loops  or  coupled  states,  classical  z  or  w 
transform  analysis  using  transfer  function  algebra  becomes  very  difficult  or  impractical  to  apply. 
Computational  errors  associated  with  transfer  function  algebra  becomes  more  of  a  factor  as  the 
number  of  operations  required  to  set  up  an  analysis  is  increased. 

Effort  was  begun  in  1985  to  develop  an  alternate  method  for  evaluating  SISO  transfer  functions 
which  (1)  does  not  employ  transfer  function  algebra,  (2)  uses  state  space  representation  and  al¬ 
gorithms  for  greater  accuracy,  (3)  automates  the  procedure  so  that  the  user  needs  only  to  specify 
the  connection  of  transfer  functions,  and  (4)  uses  the  Kalman- Bertram  state  space  method  [3]  for 
analysis  of  continuous-discrete  multirate  systems. 

After  completion  of  an  automated  method  for  transfer  function  analysis  for  both  continuous  and 
continuous-discrete  multirate  systems,  additional  flexibility  in  using  LCAP2  was  achieved  bv  the 
development  of  the  PRECMP  preprocessor  which  can  be  used  to  help  the  user  write  FORTRAN 
code. 


1.2  Versions 


Up  until  1987,  batch  LCAP2  was  hosted  only  on  the  CDC  mainframe  176  and  860  computers.  This 
program  is  now  available  on  the  CRAY  XMP-14,  In  fact  two  versions  of  batch  LCAP2  are  now 
available  on  the  CRAY.  One  is  identical  to  the  CDC  version  and  the  other  is  a  large  model  version 
which  enables  systems  twice  as  large  to  be  analyzed.  Differences  between  these  versions  of  batch 
LCAP2  and  interactive  LCAP2  are  given  below. 

1.2.1  CDC  Batch  LCAP2 

There  are  two  versions  of  batch  LCAP2  on  the  CDC  machines,  one  on  the  upper  CYBER  176  and 
one  on  the  lower  CYBER  860.  The  maximum  transfer  function  and  polynomial  order  for  both 

"Since  roots  of  z-plane  transfer  functions  are  usually  all  within  the  unit  circle,  coefficients  of  a  z-plane  transfer 
function  (which  are  related  to  the  products  of  the  roots)  cannot  be  adequately  represented  in  a  computer  program 
except  for  small  order  systems.  Any  addition  or  subtraction  of  z-plane  coefficients  (except  for  small  order  systems) 
carried  out  by  transfer  function  algebra  will  result  in  loss  of  accuracy. 
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of  these  versions  is  49  th  degree.  The  number  of  polynomials  and  s  plane,  z  plane,  and  w  plane 
transfer  functions  which  the  user  can  define  and  use  is  999  each. 

For  transfer  function  evaluation  from  a  set  of  Laplace  transformed  differential  equations  using 
Cramer’s  method,  the  order  of  the  matrix  (with  polynomial  elements  up  to  4-th  order)  is  limited 
to  30x30  with  the  constraint  that  the  determinant  must  not  be  greater  than  49-th  order. 

For  automated  transfer  function  analysis  using  the  transfer  function  connection  capability,  the  limits 
on  the  number  of  blocks  that  can  be  connected  are:  (l)  for  continuous  systems,  30  continuous  blocks 
and  (2)  for  continuous-discrete  multirate  systems,  20  continuous  blocks,  20  discrete  blocks,  and  5 
sample-hold  blocks.  In  addition  to  the  constraint  on  the  number  of  blocks  that  can  be  connected, 
the  characteristic  polynomial  to  be  computed  must  not  be  greater  than  49-th  order.  For  continuous- 
discrete  multirate  systems  there  are  additional  constraints.  The  continuous  blocks  and  the  discrete 
blocks,  each  individually,  must  not  generate  more  than  30  dynamics  states.  Also  the  number  of 
time  states  used  to  define  the  transition  matrix  must  not  exceed  50. 


1.2.2  CRAY  Batch  LCAP2 

There  is  a  regular  and  a  large  model  version  of  batch  LCAP2  on  the  CRAY.  The  regular  version  is 
identical  to  the  CDC  version  in  terms  of  model  size  limitations. 

For  the  large  model  version  of  LCAP2  the  maximum  transfer  function  and  polynomial  order  is 
100-th  degree.  The  number  of  polynomial  and  transfer  functions  which  the  user  can  use  is  un¬ 
changed. 

For  transfer  function  evaluation  from  a  set  of  Laplace  transformed  differential  equations  using 
Cramer’s  method,  the  size  of  the  matrix  (with  polynomial  elements  up  to  4-th  order)  for  the  large 
model  version  of  LCAP2  is  limited  to  50x50  with  the  constraint  that  the  determinant  must  not  be 
greater  than  100-th  order. 

For  automated  transfer  function  analysis  using  the  transfer  function  connection  capability,  the  limit 
on  the  number  of  blocks  that  can  be  connected  for  the  large  model  version  of  LCAP2  are:  (l)  for 
continuous  systems,  75  continuous  blocks  and  (2)  for  continuous-diccrete  multirate  systems,  50 
continuous  blocks,  50  discrete  blocks,  and  10  sample-hold  blocks.  In  addition  to  the  constraint  on 
the  number  of  blocks  that  can  be  connected,  the  characteristic  polynomial  to  be  computed  must 
not  be  greater  than  100-th  order.  For  continuous-discrete  multirate  systems  there  are  additional 
constraints.  The  continuous  blocks  and  the  discrete  blocks,  each  individually,  must  not  generate 
more  than  75  dynamics  states.  The  limit  on  number  of  time  states  used  to  define  the  transition 
matrix  is  the  same  as  the  regular  version  of  LCAP2. 

1.2.3  Interactive  LCAP2 

Interactive  LCAP2  runs  on  the  CDC  860  computer  under  the  INTERCOM  5.0  system  and  the 
NOS  1  operating  system.  The  available  memory  allocated  by  the  operating  system  for  interactive 
use  limits  the  size  of  problems  which  LCAP2  can  analyze  interactively.  The  maximum  transfer 
function  order  and  the  limit  on  the  number  of  states  for  automated  transfer  function  analysis  are 
the  same  as  those  for  CDC  batch  LCAP2. 

Interactive  LCAP2  has  been  revised  extensively  since  the  user’s  manual  (2l  was  issued.  Major 
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changes  have  been  (1)  the  addition  and  use  of  default  values  to  simplify  the  number  of  keystrokes,  (2) 
improved  capability  to  save  and  load  data  files,  and  (3)  the  addition  of  transfer  function  connection 
commands  for  automated  transfer  function  analysis.  The  modeling  of  transfer  function  connections 
is  much  simpler  to  do  in  interactive  LCAP2.  In  fact,  the  fastest  method  for  modeling  a  complex 
model  is  to  do  the  initial  connection  interactively,  save  the  connection  data  to  a  file,  and  then  load 
this  file  into  a  batch  job.  The  user’s  manual  for  interactive  LCAP2  will  be  revised  in  the  near 
future. 


1.3  Changes  Affecting  Users  of  Previous  Versions  of  LCAP2 


In  developing  this  version  of  batch  LCAP2,  emphasis  was  placed  on  upward  compatibility  with  the 
previous  versions  of  the  program.  The  names  and  usage  of  the  LCAP2  commands  and  LCAP2  data 
parameters  were  retained  as  much  as  possible.  However,  several  fundamental  changes  were  made 
which  will  affect  users  of  previous  versions  of  batch  LCAP2.  They  are  described  in  Appendix  C 
and  should  be  read  by  all  users  of  previous  versions  of  LCAP2.  The  changes  include  (1)  the  use 
of  CHARACTER  variables  for  labeling  plots  (previously  REAL  variables  with  Hollerith  characters 
were  used),  (2)  changing  the  use  of  common  block  HEADDB  to  common  blocks  HEAD,  DBASE, 
POLYCM,  and  ROOTCM,  (3)  renaming  of  LCAP2  array  parameters  POLY  and  ROOT  to  POLYP 
and  ROOTP,  respectively,  (4)  renaming  some  of  the  LCAP2  parameters,  (5)  changing  the  com¬ 
mands  STORE  and  RESTORE  to  SAVE  and  LOAD,  respectively,  and  (6)  changing  the  setup  for 
creating  the  main  FORTRAN  program  using  UPDATE  COMDECKs. 

The  previous  version  of  this  program  was  written  in  FORTRAN  66  (CDC  FTN4).  This  version  is 
written  in  FORTRAN  77  (CDC  FTN5  and  CRAY  CFT).  To  use  batch  jobs  developed  on  previous 
versions  of  LCAP2,  the  user  must  make  the  appropriate  code  conversion  from  FORTRAN  66  to 
FORTRAN  77. 

1.4  Organization  of  User’s  Manual 

After  this  introductory  chapter  an  overview  of  the  control  system  analysis  features  in  LCAP2  is 
given  in  Chapter  2.  A  batch  program  with  all  these  features  requires  a  fair  amount  of  writing  to 
adequately  describe  its  capability.  The  typical  user,  however,  will  seldom  read  a  user’s  manual  from 
cover  to  cover,  but  instead  will  go  directly  to  a  subject  of  interest,  particularly  those  with  examples 
close  to  the  problem  at  hand.  With  this  in  mind,  many  examples  are  included  in  this  manual. 
Some  are  complete  examples  showing  actual  output  from  a  batch  job.  Others  are  code  fragments 
illustrating  the  utility  of  the  various  commands,  parameters,  and  directives.  At  times  the  examples 
and  explanations  may  appear  repetitive,  but  if  it  can  save  the  user  some  time  it  serves  its  purpose. 

The  chapters  are  presented  in  an  order  which  does  not  present  too  much  detail  initially  so  as  not 
to  detract  the  user  from  the  utility  and  description  of  the  batch  job  structure.  Chapters  3  and  4 
provide  details  on  the  batch  job  structure  and  the  programming  aids  available  for  creating  a  batch 
LCAP2  job.  If  a  user  is  not  interested  in  this  level  of  detail  and  wants  only  to  run  a  job  as  quickly 
as  possible,  the  best  thing  to  do  is  to  go  directly  to  the  examples  in  Chapters  8  and  9.  Most  of 
those  examples  can  be  reproduced  by  the  user  from  files  listed  in  those  two  chapters. 

Chapter  6  describes  the  data  structures  used  by  LCAP2.  These  include  commands,  parameters, 
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polynomials,  and  transfer  functions  which  were  defined  in  the  original  version  of  LC  AP2.  New  data 
structures,  namely  continuous,  discrete,  and  sample-hold  connection  blocks,  are  defined  for  use  in 
connecting  transfer  functions  as  part  of  the  automated  transfer  function  analysis  capability. 

Chapter  7  describes  the  new  procedure  for  automated  analysis  of  system1*  modeled  as  a  connection 
of  transfer  function  blocks.  Examples  are  presented  in  Chapters  8  and  9.  Basic  LCAP2  commands 
are  demonstrated  in  Chapter  8  while  advanced  examples,  including  IEEE  CACSD  benchmark 
problems,  are  presented  in  Chapter  9.  Appendices  on  various  subjects  of  interest  are  included  at 
the  end  of  the  manual. 
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Chapter  2 


Overview  of  Control  Analysis 
Capabilities 


LC  AP2  is  a  control  analysis  program  which  enables  the  user  to  easily  perform  operations  on  transfer 
functions  and  polynomials  on  a  functional  level.  The  transfer  functions  are  defined  as  SPTFj, 
ZPTFj,  and  WPTF;.  and  the  polynomials  are  defined  as  POLYj,  where  i  ranges  from  0  through 
999.  LCAP2  commands  are  defined  so  that  operations  on  transfer  functions  can  be  implemented 
with  only  references  to  the  indices  of  the  transfer  functions  or  polynomials.  For  example,  to  add 
SPTF2  to  SPTF3  and  store  the  sum  into  SPTFj,  i.e, 

SPTFj  =  SPTF2  +  SPTF3 

the  FORTRAN  statement  to  implement  this  operation  is:  CALL  SPADD(1,2,3) 

The  arguments  for  an  LCAP2  commands  are  not  always  included  in  the  argument  list  of  the 
FORTRAN  subroutine  which  implements  the  command.  For  example,  to  compute  the  z  transform 
of  SPTF3  with  a  sampling  period  of  0.2  second  and  to  store  the  results  into  ZPTF5,  the  FORTRAN 
statements  can  be  written  as: 

SAHPT= . 2 
CALL  SZXFM(5,3) 

The  sampling  period  is  not  included  as  an  argument  in  subroutine  SZXFM,  but  is  specified  by 
the  value  of  SAMPT  which  is  in  a  common  block.  The  rationale  for  not  including  all  required 
arguments  of  a  command  in  the  subroutine  argument  list  is  given  below: 

•  Argument  list  is  kept  short  for  simplicity. 

•  Long  argument  lists  increase  the  chances  for  FORTRAN  errors. 

•  Use  of  parameters  which  are  in  a  common  block  allows  the  same  parameter  to  be  used  by 
other  commands  without  requiring  the  user  to  reenter  the  same  value  again. 

•  If  the  same  command  is  used  more  than  once,  parameters  in  common  blocks  do  not  have  to 
be  reentered  unless  their  values  have  been  changed,  i.e.,  plot  parameters  and  plot  options  do 
not  have  to  be  repeated  for  each  plot  unless  there  are  changes. 


2  -  1 


In  this  program  these  parameters  will  be  called  LCAP2  parameters. 

Having  defined  the  use  of  SPTF;,  ZPTFj,  WPTF;,  and  POLY;  and  also  the  use  of  LCAP2  pa¬ 
rameters  as  additional  arguments  for  LCAP2  commands,  an  overview  of  the  major  control  analysis 
features  of  LCAP2  will  be  presented  in  the  following  sections.  Sections  2.1  through  2.6  describe  the 
basic  LCAP2  commands  that  the  user  can  use  for  analyzing  control  systems.  For  simple  systems, 
these  basic  LCAP2  commands  would  be  sufficient  to  perform  an  analysis  based  on  block  diagram 
reduction  using  transfer  function  algebra.  However,  for  more  complex  systems,  transfer  function 
algebra  is  too  difficult  to  apply  or  else  leads  to  poor  numerical  results.  There  are  two  methods  in 
LCAP2  for  handling  these  cases.  The  first  one  is  a  method  which  was  first  used  in  the  1960’s  for 
analyzing  control  systems  of  launch  vehicles.  This  method  utilizes  Cramer’s  method  for  evaluat¬ 
ing  a  transrer  function  from  a  set  of  Laplace  transformed  differential  equations.  This  technique  is 
described  in  Section  2.7.  The  other  method  for  analyzing  complex  systems  is  the  transfer  function 
block  connection  method  in  which  the  program  uses  state  space  methods  to  automatically  compute 
eigenvalues,  transfer  functions,  root  loci,  frequency,  and  time  response.  This  technique  is  described 
in  Section  2.8.  The  last  section  of  this  chapter  describes  the  restart  capability  of  the  program. 


2.1  Commands  for  Transfer  Function  Algebra 


A  set  of  LCAP2  commands  is  defined  so  that  the  user  can  easily  perform  transfer  function  algebra 
with  a  simple  FORTRAN  CALL  statement  such  as  the  SPADD  command  described  previously.  In 
using  these  commands,  the  user  only  has  to  reference  the  indices  of  the  SPTF;,  ZPTF;,  WPTFj, 
or  POLY;  involved.  The  user  does  not  have  to  be  concerned  if  the  transfer  function  or  polynomial 
is  in  coefficient  or  root  (factored)  form.  The  data  base  for  SPTF;,  ZPTF;,  WPTFj,  and  POLYj 
allows  both  forms  to  be  saved.  In  fact,  each  transfer  function  and  polynomial  will  have  an  internal 
flag  to  indicate  if  the  roots  are  available  so  that  LCAP2  commands  can  be  implemented  with  better 
accuracy.  For  example,  if  two  polynomial  or  transfer  functions  are  to  be  multiplied,  and  their 
roots  are  available,  the  product  is  computed  by  collecting  the  roots  rather  than  by  multiplying 
the  coefficients.  Along  this  line  of  implementation,  if  two  transfer  functions  are  to  be  added  or 
subtracted,  the  program  first  checks  to  see  if  the  roots  of  the  transfer  functions  are  available.  If 
they  are  available,  any  common  roots  between  the  denominators  are  factored  out  before  the  sum 
is  computed.  Other  steps  taken  to  improve  the  numerical  results  include  automatic  cancellation  of 
common  numerator  and  denominator  roots  where  appropriate  and  automatic  deletion  of  negligible 
high  order  coefficients  in  an  add  or  subtract  operation. 

The  commands  for  transfer  function  algebra  are  given  in  Table  2.1.  Included  in  this  table  are 
commands  for  loading,  printing,  and  deleting  polynomials  and  transfer  functions. 
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Table  2.1:  Commands  for  Transfer  Function  Algebra 


PADD 

Polynomial  add 

PEQU 

Polynomial  equal 

PSUB 

Polynomial  subtract 

PMPY 

Polynomial  multiply 

PLDC 

Polynomial  load,  coefficient  form 

PLDR 

Polynomial  load,  root  form 

POLY 

Print  out  polynomial 

PDEL 

Delete  polynomial 

SPADD 

S  plane  transfer  function  add 

* 

SPEQU 

S  plane  equal 

* 

SPSUB 

S  plane  transfer  function  subtract 

* 

SPMPY 

S  plane  transfer  function  multiply 

* 

SPDIV 

S  plane  transfer  function  divide 

* 

SPCLSLP 

S  plane  closed  loop  transfer  function 

* 

SELCR 

Eliminate  common  roots  of  an  s  plane  transfer  function 

* 

SNORM 

S  plane  transfer  function  normalization 

* 

SPLDC 

S  plane  load,  coefficient  form 

* 

SPLDR 

S  plane  load,  root  form 

* 

SPTF 

Print  out  s  plane  transfer  function 

* 

SPDEL 

Delete  s  plane  transfer  function 

* 

CPYPS 

Copy  polynomials  into  an  s  plane  transfer  function 

* 

CPYSP 

Copy  s  plane  transfer  function  into  2  polynomials 

★ 

*  -  Corresponding  z  and  w  commands  are  available  by  substituting  Z  or  W 
for  the  letter  S. 


2.2  Frequency  Response 


Frequency  responses  of  transfer  functions  can  be  computed.  Bode,  Nichols,  and  Nyquist  plots  of 
the  responses  can  be  generated.  Both  low  resolution  printer  plots  and  high  resolution  hardcopy 
plots  are  available.  For  the  high  resolution  plots,  the  points  are  not  connected  when  there  are 
discontinuities,  such  as  when  the  phase  in  a  Nichols  plot  crosses  from  one  side  to  the  other.  Two 
methods  are  available  for  choosing  the  frequency  points  used  in  evaluating  the  frequency  response, 
an  automatic  and  a  nonautomatic  mode.  In  the  automatic  mode  the  user  specifies  up  to  20  pre¬ 
selected  points.  The  program  will  then  use  these  points  plus  its  own  dynamically  generated  points 
to  yield  a  smooth  plot  so  that  all  resonances  of  a  response  will  be  plotted.  In  the  nonautomatic 
mode  the  user  can  specify  up  to  five  different  frequency  segments  in  which  each  segment  contains 
frequencies  which  are  linearly  spaced.  With  both  modes,  the  program  will  detect  gain  and  phase 
crossovers  and  iterate  to  compute  the  exact  crossover  frequency. 


Frequency  responses  can  be  computed  for  four  different  types  of  transfer  functions. 
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•  Commands  SFREQ,  ZFREQ,  and  WFREQ  are  used  to  compute,  respectively,  the  response 
of  SPTFi,  ZPTFi,  and  WPTF;  transfer  functions  which  are  all  rational  functions. 

•  Command  BlFREQ  is  used  to  compute  the  response  of  an  s  plane  transfer  function  defined  by 
a  connection  s  plane  transfer  function  blocks.  This  command  evaluates  the  response  directly 
from  a  state  space  representation  of  the  system  without  solving  for  the  poles  and  zeros  of  the 
transfer  function.  Command  B2FREQ  is  used  to  compute  the  response  of  a  z  plane  transfer 
function  defined  by  a  connection  of  s  and  z  plane  transfer  functions  and  sample-hold  blocks. 
Like  the  BlFREQ  command,  the  response  is  computed  without  having  to  solve  for  the  poles 
and  zeros  of  the  transfer  function. 

•  Command  FREQS,  FREQZ,  and  FREQW  are  used  to  compute  the  response  of  a  general 
function  which  the  user  specifies  in  a  user-defined  function.  For  example,  these  functions  can 
be  (l)  a  nonrational  function  such  as  the  closed  loop  transfer  function  of  a  system  with  dead 
time  or  (2)  a  transfer  function  which  is  not  explicitly  represented  as  a  ratio  of  two  polynomials, 
i.e.,  a  ratio  of  two  matrices  with  polynomial  or  transfer  function  elements.  These  user-defined 
function  frequency  response  commands  are  also  referred  to  as  generalized  frequency  response 
commands. 

•  Command  ZMRFQ  is  used  to  numerically  evaluate  the  fast-slow  multirate  (by  frequency 
decomposition)  frequency  response  of  a  ZPTF;  transfer  function.  Command  WMRFQ  is  the 
w  plane  equivalent  of  command  ZMRFQ. 

The  frequency  response  commands  are  given  in  Table  2.2. 

Table  2.2:  Frequency  Response  Commands 

Frequency  response  of  SPTFj 
Frequency  response  of  ZPTF; 

Frequency  response  of  WPTF; 

SISO  frequency  response  of  a  continuous  system  modeled  as  a 
connection  of  s  plane  transfer  functions 

SISO  frequency  response  of  a  continuous-discrete  multirate  sys¬ 
tem  modeled  as  a  connection  of  s  and  z  plane  transfer  functions 
and  sample-hold  blocks 

Frequency  response  of  a  user  supplied  s  plane  function 
Frequency  response  of  a  user  supplied  z  plane  function 
Frequency  response  of  a  user  supplied  w  plane  function 
Frequency  response  of  a  fast-slow  multirate  z  transform 
Frequency  response  of  a  fast- slow  multirate  w  transform 


SFREQ 

ZFREQ 

WFREQ 

BlFREQ 

B2FREQ 


FREQS 

FREQZ 

FREQW 

ZMRFQ 

WMRFQ 


2.3  Time  Response 


Time  response  of  (l)  SPTF;  and  ZPTF;  transfer  functions  and  (2)  continuous  and  continuous- 
discrete  systems  defined  by  a  connection  of  transfer  function  blocks  can  be  computed. 

For  an  SPTF;  transfer  function,  the  inverse  Laplace  transform  is  computed  by  the  partial  fraction 
method  to  yield  an  analytical  solution.  The  time  response  is  obtained  by  evaluating  it  over  a  time 
period  of  interest.  Inputs  for  this  command  are  ( 1 )  type  of  input,  an  impulse  or  step,  (2)  magnitude, 
(3)  start  time,  (4)  end  time,  (5)  delta  time,  and  (6)  plot  parameters. 

For  a  ZPTF;  transfer  function,  the  response  is  computed  by  recursive  evaluation  of  a  difference 
equation.  The  input  for  this  command  is  similar  to  that  for  the  s  plane  case  except  that  the  start 
time  must  be  t  =  0  and  the  response  is  computed  at  every  sampling  time. 

For  continuous  and  continuous-discrete  systems  defined  by  a  connection  of  transfer  function  blocks, 
state  space  methods  are  used  to  compute  a  SISO  time  response.  The  inputs  for  these  commands 
are  similar  to  the  command  for  time  response  of  a  ZPTF;  transfer  function. 

Both  low  resolution  printer  plots  and  high  resolution  hardcopy  plots  of  the  response  are  available. 
The  time  response  commands  are  given  in  Table  2.3. 


Table  2.3:  Time  Response  Commands 


STIME 

Time  response  of  SPTF;  by  inverse  Laplace  transform 

ZTIME 

Time  response  of  ZPTF;  by  recursive  evaluation  of  a  differenece 
equation 

BITIME 

SISO  time  response  of  a  continuous  system  modeled  by  a  con¬ 
nection  of  s  plane  transfer  functions 

B2TIME 

SISO  time  response  of  a  continuous-discrete  multirate  system 
modeled  as  a  connection  of  s  and  z  plane  transfer  functions  and 
sample-hold  blocks 

2.4  Root  Finding 


Roots  of  a  POLYj  polynomial  or  an  SPTF;,  ZPTFj,  or  WPTF;  transfer  function  can  be  com¬ 
puted.  The  root  finding  commands  are  given  in  Table  2.4. 


Table  2.4: 

Root  Finding  Commands 

PRTS 

Find  roots  of  POLY; 

SPRTS 

Find  roots  of  SPTF; 

ZPRTS 

Find  roots  of  ZPTF; 

WPRTS 

Find  roots  of  WPTFj 
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2.5  Root  Locus 


Root  locus  for  an  SPTF;,  ZPTFi,  and  WPTF;  transfer  function  can  be  computed.  The  transfer 
function  must  represent  the  open  loop  transfer  function  of  the  system  being  analyzed.  The  gains 
used  for  computing  the  root  locus  can  be  selected  from  a  combination  of  fixed  gains  and  linearly 
or  logarithmic  spaced  gains.  The  roots  for  each  gain  is  printed  out. 

Both  low  resolution  printer  plots  and  high  resolution  hardcopy  plots  are  available.  For  hardcopy 
plots,  an  option  is  available  for  tagging  each  gain. 

The  root  locus  commands  are  given  in  Table  2.5. 


Table  2.5:  Root  Locus  Commands 


SLOCI 

Root  locus  of  SPTF; 

ZLOCI 

Root  locus  of  ZPTF; 

WLOCI 

Root  locus  of  WPTF;  j 

In  using  the  commands  in  Table  2.5  to  compute  the  root  locus  of  a  system,  the  open  loop  transfer 
function  must  first  be  computed.  In  general,  root  locus  plots  do  not  necessarily  have  to  correspond 
to  variations  in  a  loop  gain.  The  loci  can  be  with  respect  to  any  variable.  To  use  the  commands 
in  Table  2.5,  all  that  is  necessary  is  that  an  appropriate  open  loop  transfer  function  be  computed. 
This,  however,  is  not  always  easy  to  do,  particularly  with  complex  systems  in  which  the  gain  to  be 
varied  is  not  directly  in  a  forward  or  feedback  loop.  For  these  situations  commands  BlLOCI  and 
B2LOCI  described  in  Section  2.8  can  be  used  to  automatically  compute  the  root  loci  without  first 
computing  an  open  loop  transfer  function. 


2.6  Transfer  Function  Transforms 

Many  different  transforms  between  SPTF;,  ZPTF;,  and  WPTF;  transfer  functions  are  available. 
These  commands  generally  have  names  ending  with  the  letters  XFM.  The  first  two  letters  of  the 
command  generally  describe  the  transform.  For  example,  the  command  SZXFM  computes  the 
classical  s  to  z  plane  transform  by  the  partial  fraction  method.  This  command  includes  a  time 
delay  and  a  zero  order  hold  if  desired.  The  analogous  command  for  s  to  w  plane  is  SWXFM. 

To  convert  between  the  z  and  w  plane  there  are  two  bilinear  transform  commands,  ZWXFM  and 
WZXFM.  The  bilinear  transforms  are  defined  by  the  following: 

z  -  1 


1  +  w 

z  =  - 

1  -  w 

Although  the  transform  from  the  z  or  w  plane  to  the  s  plane  is  not  unique,  commands  ZSXFM  and 
WSXFM  are  defined  to  compute  “equivalent”  s  plane  root9  to  aid  the  analyst  in  identifying  and 
correlating  z  and  w  plane  roots.  These  two  commands  do  not  generate  an  s  plane  transfer  function; 
they  only  print  out  the  equivalent  s  plane  roots,  The  equivalent  s  plane  roots  are  computed  from 
the  following: 
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•s  =  ln(z)/T 


/n(i+— )/T 
1  -  w 


where  T  is  the  sampling  period. 

For  multirate  analysis  there  are  three  types  of  commands: 

1.  Commands  SZMRX  and  SWMRX  are  identical  to  commands  SZXFM  and  SWXFM,  respec¬ 
tively,  except  that  when  the  zero-order  hold  is  used,  the  sampling  period  of  the  zero-order 
hold  is  at  the  slower  rate. 

2.  Command  ZVCNG  changes  the  z  variable  of  a  z  plane  transfer  function  to  z”. 

3.  Commands  ZMRXFM  and  WMRXFM  compute  the  fast-slow  multirate  transform  by  fre¬ 
quency  decomposition.  The  resulting  transform  is  a  rational  function  at  the  slower  rate 
variable. 

The  transfer  function  transform  commands  are  given  in  Table  2.6. 


Table  2.6:  Transfer  Function  Transform  Commands 


SZXFM 

S  to  z  plane  transform  (classical  z  transform) 

SWXFM 

S  to  w  plane  transform  (classical  w  transform) 

ZWXFM 

Z  to  w  plane  bilinear  transform 

WZXFM 

W  to  z  plane  bilinear  transform 

ZSXFM 

Z  to  “equivalent”  s  plane  root  transform 

WSXFM 

W  to  “equivalent”  s  plane  root  transform 

SZMRX 

S  to  z  plane  slow-fast  multirate  transform  (ZOH  at  a  slower  rate) 

SWMRX 

S  to  w  plane  slow-fast  multirate  transform  (ZOH  at  a  slower  rate) 

ZMRXFM 

Z  plane  fast -slow  multirate  transform  in  rational  form 

WMRXFM 

W  plane  fast-slow  multirate  transform  in  rational  form 

2.7  Transfer  Function  Evaluation  from  a  Set  of  Laplace  Trans¬ 
formed  Differential  Equations 


Modeling  of  control  systems  by  using  transfer  function  algebra  for  block  diagram  reduction  is 
straightforward  if  the  configuration  is  not  complex  and  all  the  transfer  functions  are  given  as 
ratios  of  polynomials.  In  the  analysis  of  large  launch  vehicles  both  of  these  considerations  are  not 
present.  There  are  many  feedback  loops  and  the  vehicle  dynamics  equations  are  very  complex  so 
that  transfer  functions  between  actuators  and  sensor  outputs  cannot  be  determined  symbolically. 
This  type  of  problem  can  be  solved  by  converting  all  the  transfer  functions  (compensators,  actuators. 
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and  sensors)  to  sets  of  Laplace  transformed  equations  and  then  augmenting  them  with  the  vehicle 
dynamics  equations  to  form  a  system  represented  by: 

M(s)  x(s)  -  B(s)  u(s) 

where,  M(s)  -  M4  s4  -t-  M3  s3  r  M2  s2  1  ML  s  t  M() 

B(s)  ^  B4  s4  -  B3  s3  +  B2  s2  +  B  I  s  -  BO 
x(s)  is  a  state  vector 

MO,  Ml,  M2,  M3,  M4  are  square  matrices 
BO,  Bl,  B2,  B3,  B4  are  column  vectors 
u(s)  is  a  scalar 


Then  bv  Cramer’s  method,  the  transfer  function  from  u  to  is  given  bv: 

x^(s)  det  Mj(s) 

u(s)  det  M(s) 

where  M_,(s)  is  equal  to  M(s)  with  column  j  replaced  by  B(s).  By  definition,  M0(s)  =  M(s). 

The  commands  for  evaluating  the  determinant  of  Mj(s)  are  given  in  Table  2.7.  It  includes  the  old 
version,  DETRM,  for  compatibility  with  previous  versions  of  LCAP2. 

Table  2.7:  Commands  for  Determinant  of  a  Polynomial  Matrix 
f  DTERM  Determinant  of  M_,(s)  1 

J  DETRM  |  Determinant  of  M(s)  (old  version) 


In  setting  up  an  analysis  using  the  above  method,  include  as  state  variables  all  output  variables 
which  define  an  open  or  closed  loop  transfer  function  of  interest.  Transfer  functions  are  then 
computed  by  evaluating  the  appropriate  determinants  and  using  the  CPYPS  command  to  store 
them  into  an  SPTFj  transfer  function.  Frequency  response,  time  response,  or  root  locus  commands 
can  then  be  used  to  analyze  the  system. 

The  above  method  of  analysis  can  only  be  used  for  continuous  systems.  For  analysis  of  continuous- 
discrete  systems,  such  as  launch  vehicles,  this  method  of  analysis  ran  be  used  only  to  compute 
s  plane  transfer  functions  of  the  plant  which  are  usually  very  complex  due  to  flexible  bending 
dynamics.  W  transforms'  of  the  plant  transfer  functions  and  other  s  plane  transfer  functions 
(i.e.,  sensor  and  actuator)  are  then  computed.  Similarly,  w  transforms  of  the  digital  compensators 
are  computed.  For  most  launch  vehicles,  once  the  plant  dynamics  blocks  between  the  actuators 
and  the  sensors  are  computed,  the  configuration  of  system  in  the  w  plane  is  not  that  complex  so 
that  transfer  function  algebra  can  be  used  to  compute  open  and  closed  loop  transfer  functions  for 
assessing  stability  and  performance  of  the  system. 

1  VV  plane  instead  of  i  plane  used  for  computational  reasons. 
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2.8  Automated  Analysis  Using  Transfer  Function  Connection 
Blocks 

The  automated  analysis  method  using  transfer  function  connection  blocks  can  be  used  for  analysis 
of  both  continuous  and  continuous-discrete  multirate  systems.  The  user  does  not  have  to  perform 
block  diagram  reduction  using  transfer  function  algebra  or  write  sets  of  Laplace  transformed  dif¬ 
ferential  equations  for  the  entire  system  as  described  in  Section  2.7.  Continuous,  discrete,  and 
sample-hold  connection  blocks  are  defined  and  used  together  with  the  SPTF;  and  ZPTFj  transfer 
functions  so  that  the  user  can  efficiently  set  up  and  change  the  configuration  of  a  system  being 
analyzed.  All  that  is  required  of  the  user  for  modeling  a  system  is  to  (1)  enter  the  number  of 
connection  blocks,  (2)  assign  a  descriptive  label  to  each  connection  block,  (3)  specify  an  SPTF*  or 
ZPTFj  identifier  number  for  each  continuous  or  discrete  connection  block,  (4)  specify  the  inputs 
to  each  connection  block,  and  (5)  specify  the  sampling  period  for  each  discrete  and  sample-hold 
connection  block. 

I  he  continuous,  discrete,  and  sample-hold  connection  blocks  are  defined  as  C;,  Dj,  and  Sj,  where 
i  ranges  from  1  to  the  number  of  blocks  defined.  This  overview  will  not  go  into  the  details  on 
how  to  specify  the  connection  blocks.  That  will  be  done  in  Chapter  7.  The  LCAP2  commands  for 
implementing  this  type  of  analysis  will  have  the  prefix  B1  or  B2.  B1  will  be  used  for  continuous 
systems  and  B2  will  be  used  for  continuous-discrete  multirate  systems.  An  example  of  both  type  of 
systems  will  be  presented  in  the  following  subsections  to  summarize  how  the  blocks  are  connected 
and  used. 

2.8.1  Continuous  Systems 

The  following  continuous  system  in  Figure  2.1  has  five  different  s  plane  connection  blocks,  each 
with  a  desriptive  label. 


SPTF0  SPTF7  SPTFj 


outer  loop 


Figure  2.1:  Continuous  System  Example 
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After  the  user  has  specified  the  connection  for  each  block,  the  following  will  he  printed  by  the 
program: 


NUMBER  OF  CONTINUOUS  BLOCKS  =  5 
BLOCK  DESCRIPTION 

Cl  SUMMING  BLOCK  USED  TO  DEFINE  -(C2  +  C3) 

C2  INNER  LOOP  COMPENSATOR 

C3  OUTER  LOOP  COMPENSATOR 

C4  FORWARD  LOOP  COMPENSATOR 

CS  PLANT 

BLOCK  TRANSFER  FUNCTION  INPUTS  FROM  BLOCK 


Cl 

SPTFO 

-C2 

C2 

SPTF6 

C4 

C3 

SPTF20 

C5 

C4 

SPTF7 

Cl 

C5 

SPTF1 

C4 

Each  time  a  summary  of  the  transfer  function  connection  blocks  is  printed  out,  a  description  of  each 
Cj  block  is  included  to  aid  the  user  in  verifying  the  correctness  of  the  connections.  All  the  data  in 
the  above  printout,  which  completely  describes  the  connection  of  the  system,  can  be  saved  to  a  file 
so  that  it  can  be  reused  in  another  job.  This  transfer  function  connection  file  only  describes  the 
connection  of  the  C;  blocks.  It  is  totally  independent  of  SPTF;  data  except  for  the  SPTF  identifier 
number  associated  with  each  C;  block.  This  separation  between  connection  of  C,  data  and  SPTF; 
data  allows  the  user  to  model  and  analyze  a  system  more  efficiently.  Revisions  to  an  existing  model 
can  be  made  by  substituting  different  SPTF  identifiers  for  the  appropriate  C;  blocks. 

Unlike  the  block  diagram  reduction  method  described  in  the  previous  subsections,  opening  and 
closing  loops  does  not  entail  any  effort  on  the  part  of  the  user  other  than  the  removal  or  addition 
of  an  input  to  the  appropriate  C;  block. 

After  a  system  has  been  modeled,  there  are  five  LCAP2  commands  that  are  available  for  analysis 
of  continuous  systems.  Command  BlEIG  will  compute  the  eigenvalues  of  the  system  and  store 
the  results  into  a  POLYj  polynomial.  Command  B 1  FREQ  will  compute  the  s  plan.  r  ’ey 
response  between  any  two  C;  blocks.  Command  BlTIME  will  compute  the  time  response  bti.c^n 
anv  two  C;  blocks.  Command  BlLOCI  will  compute  the  root  locus  by  varying  the  gain  of  any  C; 
block.  Command  BITE  will  compute  the  transfer  function  in  rational  form  between  two  C;  blocks 
and  store  the  results  into  an  SPTF;  transfer  function. 

State  space  methods  are  used  to  implement  this  automated  analysis  procedure. 

The  Block  I  analysis  commands  are  given  in  Table  2.8. 
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Table  2.8:  Commands  for  Automated  Analysis  of  Continuous  Systems 


B1EIG 

Compute  eigenvalues  of  a  continuous  system  modeled  as  a  connec¬ 
tion  of  s  plane  transfer  functions 

BlFREQ 

Compute  frequency  response  of  a  continuous  system  modeled  as  a 
connection  of  s  plane  transfer  functions 

BITIME 

Compute  time  response  of  a  continuous  system  modeled  as  a  con¬ 
nection  of  s  plane  transfer  functions 

BlLOCI 

Compute  root  locus  of  a  continuous  system  modeled  as  a  connection 
of  s  plane  of  transfer  functions 

BlTF 

Compute  transfer  function  of  a  continuous  system  modeled  as  a 
connection  of  s  plane  transfer  functions 

2.8.2  Continuous-Discrete  Multirate  Systems 

The  continuous-discrete  multirate  system  in  Figure  2.2  has  two  s  plane,  seven  z  plane,  and  one 
zero  order  hold  block,  each  with  a  descriptive  label.  This  example1  is  from  the  IEEE  CACSD 
Benchmark  Problem  No.  3,  2-Rate  Model,  in  Ref.  5. 

After  the  user  has  specified  the  connection  for  each  block,  the  following  will  be  printed  by  the 
program: 


NUMBER  OF  CONTINUOUS  BLOCKS  =  2 
BLOCK  DESCRIPTION 

Cl  Cl  BLOCK 

C2  G2  BLOCK 

BLOCK  TRANSFER  FUNCTION  INPUTS  FROM  BLOCK 


Cl 

SPTF1 

SI 

C2 

SPTF2 

SI 

NUMBER 

OF  DISCRETE  BLOCKS  =  6 

BLOCK 

DESCRIPTION 

D1 

G3  BLOCK 

D2 

G4  BLOCK 

D3 

G5  BLOCK 

D4 

G6  BLOCK 

D5 

G7  BLOCK 

D6 

SUMMER  BLOCK 

C, 


'The  unity  D>  block  is  not  in  the  benchmark  problem.  It  is  included  here  to  define  the  sampled  output  of  block 
at  the  slower  sampling  rate.  This  output  state  is  used  for  defining  a  close  loop  transfer  function. 
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G5  G7  G2 


Figure  2.2:  Continuous-Discrete  Multirate  System  Example 


BLOCK 

TRANSFER  FUNCTION 

SAMPLING  PERIOD 

INPUTS  FROM  BLOCKS 

D1 

ZPTF3 

. 20000E-01 

HAS  NO  INPUT 

D2 

ZPTF4 

. 20000E-01 

D4 

D3 

ZPTF5 

. 20000E-01 

D5 

D4 

ZPTF6 

. 50000E-02 

Cl 

D5 

ZPTF7 

. 50000E-02 

C2 

D6 

ZPTF10 

. 20000E-01 

-D1  ,  D2  ,-D3 

NUMBER 

OF  SAMPLE-HOLD  BLOCKS 

*  1 

BLOCK 

DESCRIPTION 

SI 

ZOH  BLOCK 

BLOCK 

SAMPLING  PERIOD 

INPUTS  FROM  BLOCKS 

SI  . 20000E-01  D6 

Each  time  a  summary  of  the  transfer  function  connection  blocks  is  printed  out,  a  description  of 
each  Cj,  Dj,  and  Sj  block  is  included  to  aid  the  user  in  verifying  the  correctness  of  the  connection. 
Each  Dj  and  S;  block  includes  its  sampling  period  which  are  all  assumed  to  be  synchronized  at 
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t  =  0.  All  the  data  in  the  above  printout,  which  completely  describes  the  connection  of  the  system, 
can  be  saved  to  a  file  so  that  it  can  be  reused  in  another  job.  This  transfer  function  connection  file 
only  describes  the  connection  of  the  Q,  D;,  and  S;  blocks.  It  is  totally  independent  of  SPTF;  and 
ZPTF;  data  except  for  the  SPTF  or  ZPTF  identifier  number  associated  with  each  Cj  or  D;  block. 
This  separation  between  connection  of  Cj  and  D;  data  and  SPTF;  and  ZPTF;  data  allows  the 
user  to  model  and  analyze  a  system  more  efficiently.  Revisions  to  an  existing  model  can  be  made 
by  substituting  different  SPTF  and  ZPTF  identifiers  for  the  appropriate  C;  or  D;  blocks. 

The  first  part  of  this  automated  analysis  procedure  is  to  compute  the  state  space  representation 
for  the  continuous,  discrete,  and  sample-hold  parts  of  the  system  in  terms  of  the  output  states  of 
the  C;,  D;  and  S;  blocks.  The  next  part  is  the  use  of  the  Kalman-Bertram  state  space  method 
to  compute  the  state  transition  matrix  of  the  system.  The  sampling  period  of  the  computed  state 
transition  matrix  is  equal  to  the  LCM1  of  all  the  sampling  periods  and  it  defined  in  this  manual  as 
the  LCM  sampling  frequency.  The  last  part  is  computing  eigenvalues,  transfer  functions,  root  loci, 
and  frequency  response  from  the  transition  matrix. 

There  are  five  LCAP2  commands  available  for  analysis  of  continuous-discrete  multirate  systems. 
Command  B2EIG  will  compute  the  eigenvalues  of  the  system  and  score  the  results  into  a  POLY; 
polynomial.  Command  B2FREQ  will  compute  the  z  plane  frequency  response  between  two  D; 
blocks.  Command  B2TIME  will  compute  the  time  response  between  two  D;  blocks.  Command 
B2LOCI  will  compute  the  root  locus  by  varying  the  gain  of  any  C;  or  D;  block.  Command  B2TF 
will  compute  the  transfer  function  between  two  D;  blocks.  For  commands  B2FREQ,  B2TIME,  and 
B2TF  the  following  constraints  are  imposed: 

•  A  transfer  function  can  only  be  aefined  at  the  LCM  sampling  period. 

•  rihe  input  and  output  D;  blocks  which  define  a  transfer  function  must  be  at  the  LCM  sampling 
period. 

•  Time  response  can  only  be  evaluated  at  the  LCM  sampling  period. 

These  constraints  on  commands  B2FREQ  and  B2TF  means  that  the  frequency  response  method  for 
evaluating  stability  of  single  rate  systems  cannot  always  be  applied  to  multirate  systems.  Frequency 
response  of  an  open  loop  can  only  be  computed  if  the  sampling  period  of  the  loop  is  equal  to  the 
LCM  sampling  period.  For  a  loop  which  is  sampled  at  a  rate  faster  than  the  LCM  sampling  rate, 
a  time  invariant  transfer  function  cannot  be  computed.  Thus,  gain  and  phase  margins  can  only  be 
computed  for  those  loops  which  are  at  the  LCM  sampling  rate.  This,  however,  does  not  mean  that 
stability  of  a  faster  loop  cannot  be  assessed  since  a  root  locus  analysis  can  always  be  performed  at 
any  sampling  rate. 

The  Block  2  analysis  commands  for  continuous  systems  are  given  in  Table  2.9. 


2.9  Restart  Capability 


The  restart  capability  consists  of  LCAP2  commands  for  saving  and  loading  two  different  types  of 
data.  The  command  SAVE  will  save  (1)  all  SPTFj,  ZPTFj,  WPTFj,  and  POLY;  data,  (2)  all 
MO,  Ml,  M2,  M3,  and  M4  matrices  and  (3)  all  BO,  Bl,  B3,  B4  vectors  that  are  defined  at  the  time 

1  Least-cominon-multiple 
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Table  2.9:  Commands  for  Automated  Analysis  of  Continuous-Discrete  Multirate  Systems 


B2EIG 

Compute  eigenvalues  of  a  continuous-discrete  multirate  system  mod¬ 
eled  as  a  connection  of  s  and  z  plane  transfer  functions  and  sample- 
hold  blocks 

B2FREQ 

Compute  frequency  response  of  a  continuous-discrete  multirate  sys¬ 
tem  modeled  as  a  connection  of  s  and  z  plane  transfer  functions  and 
sample-hold  blocks 

B2TIME 

Compute  time  response  of  a  continuous-discrete  multirate  system 
modeled  as  a  connection  of  s  and  z  plane  transfer  functions  and 
sample-hold  blocks 

B2I.OCI 

Compute  root  locus  of  a  continuous-discrete  multirate  system  mod¬ 
eled  as  a  connection  of  s  and  z  plane  transfer  functions  and  sample- 
hold  blocks 

B2TF 

Compute  transfer  function  of  a  continuous-discrete  multirate  system 
modeled  as  a  connection  of  s  and  z  plane  transfer  functions  and 
sample-hold  blocks 

this  command  is  invoked.1  This  data  is  saved  to  a  local  file  which  can  be  CATALOGed  (CDC)  or 
SAVEed  (CRAY)  upon  exit  from  a  batch  job.  The  data  is  saved  as  a  sequential  unformatted  file. 
Data  saved  by  the  command  SAVE  can  be  reloaded  by  the  command  LOAD. 

The  commands  BlSAVE  and  B2SAVE  will  save  the  transfer  function  connection  data  described  in 
Section  2.8.  Unlike  the  SAVE  and  LOAD  commands,  the  data  is  saved  as  an  ASCII  file  using  a 
format  which  is  compatible  with  the  PRECMP  precompiler. 

The  purpose  of  using  this  format  is: 

•  The  file  is  short. 

•  The  file  can  be  read  and  edited  by  an  editor. 

•  Use  of  PRECMP  directives  allows  more  versatile  use  of  the  data.  This  will  be  described  in  a 
following  paragraph. 

Like  the  SAVE  command,  the  files  created  by  the  BlSAVE  and  B2SAVE  commands  are  saved  to 
local  files  which  must  be  CATALOGed  (CDC)  or  SAVEed  (CRAY)  upon  exit  from  a  batch  job. 

In  a  restart,  the  normal  method  for  loading  in  data  saved  with  either  the  BlSAVE  or  B2SAVE 
commands  is  to  use  the  BlLOAD  or  B2LOAD  commands.  However,  since  this  file  was  created  with 
a  format  which  is  compatible  with  PRECMP,  the  data  itself  can  be  used  to  create  the  FORTRAN 
source  code  to  define  the  transfer  function  connection.  This  capability  would  be  useful  in  a  fast 
setup  of  a  batch  job  for  analysis  of  a  system  with  many  connection  blocks.  Since  the  FORTRAN 
code  or  PRECMP  code  for  specifying  the  connection  blocks  will  take  some  effort  to  set  up  and 
check  out,  the  user  can  use  interactive  LCAP2  instead  to  specify  the  transfer  function  connections. 
Interactive  LCAP2  is  much  easier  to  use  for  specifying  the  connection  of  transfer  function  blocks 

'If  there  are  transfer  function  and  polynomial  data  that  are  not  to  be  saved,  delete  them  first  with  the  PDEL, 
SPDEL,  ZPDEL,  or  WPDEL  commands. 
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since  it  is  prompt  driven  and  includes  logic  tests  for  reasonable  inputs.  Once  the  connections  has 
been  completed  and  verified  on  interactive  LCAP2,  the  user  can  save  the  data  with  the  BlSAVE 
or  B2SAVE  command.  The  data  in  this  file  can  then  be  read  by  an  editor  and  inserted  as  source 
code  to  a  batch  LCAP2  job  which  uses  the  PRECMP  precompiler.  The  amount  of  time  saved  can 
be  significant. 

The  restart  commands  are  given  in  Table  2.10.  All  of  these  commands  include  a  file  name  as  one 
of  its  arguments. 


Table  2.10:  Restart  Commands 


SAVE 

Save  all  SPTF;,  ZPTFj.WPTFj,  POLY;  data,  all  MO,  Ml,  M2,  M3, 
M4  matrices,  and  all  BO,  Bl,  B2,  B3,  B4  vectors  currently  in  use 

LOAD 

Load  data  saved  by  the  SAVE  command 

BlSAVE 

Save  transfer  function  connection  data  for  a  continuous  system 

B2SAVE 

Save  transfer  function  connection  data  for  a  continuous-discrete  multirate 
system 

BlLOAD 

Reload  data  saved  by  the  BlSAVE  command 

B2LOAD 

Reload  data  saved  by  the  B2SAVE  command 
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Chapter  3 


Overview  of  Batch  LCAP2  Program 
Structure 


Although  LCAP2  commands  are  defined  to  be  easily  used  by  a  control  systems  analyst,  the  job 
structure  for  a  batch  job  is  not  necessarily  simple.  This  would  be  the  case  for  users  not  familiar 
with  the  CDC  and  CRAY  UPDATE  programs  for  maintaining  source  code  libraries.  To  compli¬ 
cate  matters,  another  level  of  complexity  is  added  to  the  job  structure  if  the  optional  PRECMP 
preprocessor  program  for  generating  FORTRAN  code  is  used.  Before  introducing  the  use  of  the  UP¬ 
DATE  and  PRECMP  programs  in  the  next  chapter,  an  overview  of  the  batch  LCAP2  job  structure 
is  presented. 

A  batch  job  consists  of  (1)  a  set  of  control  cards  and  (2)  user  code  for  creating  a  FORTRAN 
program.  The  FORTRAN  code  to  be  created  is  a  main  program  plus  any  subroutines  or  functions 
that  the  user  may  want  to  write.  The  main  program  must  include  many  different  common  block 
declaration  statements,  some  which  will  require  many  lines  of  code.  The  user  is  not  expected  to 
enter  in  all  this  code  each  time  a  main  program  is  to  be  created  since  mistakes  can  be  easily  made. 
What  is  needed  is  a  statement  or  a  directive  which  will  allow  a  set  of  FORTRAN  statements  to  be 
inserted  into  the  body  of  a  FORTRAN  program.  Unfortunately,  this  is  not  a  part  of  the  standard 
ANSI  FORTRAN  language.  Some  FORTRAN  compilers,  like  the  IBM  System/360  and  Lahey 
F77L,  have  an  INCLUDE  statement  as  an  extension  to  their  language  to  allow  this  type  of  code 
insertion  to  be  made.  Both  the  CDC  and  CRAY  FORTRAN  languages  do  not  have  this  INCLUDE 
statement  as  part  of  their  extended  language.  To  insert  sets  of  source  code  into  a  program  on  these 
two  machines,  the  UPDATE  program  is  used.  This  is  a  line-oriented  text  editor  for  maintaining 
programs  in  the  form  of  source  code.  It  creates  and  modifies  source  code  libraries  and  produces 
output  that  can  be  used  as  input  to  other  programs,  which  for  LCAP2  is  the  FORTRAN  compiler. 
All  common  blocks  used  by  LCAP2  are  saved  in  the  program  library  so  that  they  can  be  easily 
inserted  into  the  user’s  source  code  with  the  appropriate  UPDATE  directive.  This  will  be  described 
in  the  next  chapter. 

Another  use  of  the  UPDATE  program  in  batch  LCAP2  is  that  it  allows  access  to  LCAP2  source 
code  for  making  modifications.  Typically,  the  only  time  that  a  user  would  access  this  code  is  when 
a  user-defined  function  is  to  be  used.  Several  user-defined  functions  are  coded  so  that  the  user 
needs  only  to  insert  the  appropriate  statements  in  the  body  of  the  routine  to  use  it. 

The  output  of  the  UPDATE  program  is  source  code  which  is  to  be  compiled  by  the  FORTRAN 
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compiler.  After  this  code  is  compiled,  it  is  linked  with  various  libraries,  loaded,  and  executed. 

The  overview  presented  so  far  has  not  included  the  PRECMP  precompiler  for  writing  FORTRAN 
statements.  This  is  an  optional  program  that  is  to  be  used  before  the  UPDATE  program.  When  it 
is  used,  all  the  user’s  code,  including  UPDATE  directives  will  be  inputs  to  the  PRECMP  program. 
Output  of  the  PRECMP  program  is  a  file  named  PCMPILE  which  will  be  used  as  input  to  the 
UPDATE  program. 

A  flow  chart  on  how  the  LCAP2  program  is  created  is  given  in  Figure  3.1. 
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Figure  3.1:  Flow  Chart  of  LCAP2  Program  Creation 
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Chapter  4 


Program  Development  Aids 


4.1  UPDATE 

The  UPDATE  program  is  a  line-oriented  text  editor  for  maintaining  programs  in  the  form  of  source 
code.  This  discussion  on  UPDATE  is  very  limited.  Only  basic  UPDATE  operations  and  directives 
for  coding  an  UPDATE  input  file  will  be  discussed.  For  more  detail,  see  Refs.  6  and  7.  An  LCAP2 
source  code  library  has  been  created  which  the  user  must  attach  each  time  a  run  is  to  be  made. 
This  library  includes  all  the  source  code  for  (l)  the  common  blocks  used  by  the  LCAP2  subroutine 
library  and  the  main  program  which  the  user  is  to  create  and  (2)  the  subroutines  in  the  LCAP2 
library.  The  common  blocks  are  stored  in  UPDATE  COMDECKs  which  can  be  copied  to  any 
location  in  the  user’s  source  code  with  the  *CALL  directive. 

When  a  batch  LCAP2  job  is  executed,  the  UPDATE  program  is  used  to  create  the  source  code  for 
the  user’s  main  program.  In  UPDATE  terminology,  this  is  called  a  modification  run  since  an  old 
source  code  library  is  to  be  used.  The  first  record  of  the  input  file  for  UPDATE  must  be  an  +IDENT 
directive  with  a  modification  set  identifier.  This  is  then  followed  by  one  or  more  modification  sets 
which  usually  begin  with  a  +INSERT,  +BEFORE,  or  *DELETE  directive.  For  an  LCAP2  job,  the 
input  file  should  have  the  following  form: 


♦IDENT  identifier 
♦INSERT  START. 1 

PROGRAM  LCAP2 ( INPUT , OUTPUT , TAPE5= INPUT , TAPE6=0UTPUT ) 

♦CALL  C0MLCAP2 

CALL  INITO  “note  that  the  last  character  is  the  number  0” 

CALL  MINITO  “note  that  the  last  character  is  the  number  0” 


user  code 

CALL  LEXIT 
END 
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where  the  identifier  in  record  1  can  be  any  eight  character  name.  The  ’INSERT  directive  is  used  to 
designate  where  the  next  text  line  image,  in  this  case,  the  PROGRAM  statement,  is  to  be  placed. 
The  argument  of  this  directive,  START. 1,  is  a  located  near  the  beginning  of  the  old  source  code 
library  before  any  of  the  LCAP2  subroutine  code.  This  will  ensure  that  main  program  will  be 
compiled  before  any  FORTRAN  subroutine  or  function.  The  PROGRAM  statement  is  the  first 
FORTRAN  statement  of  the  main  program.  The  *CALL  directive  will  insert  source  code  from 
the  old  program  library  after  the  PROGRAM  statement.  The  argument  of  this  +CALL  directive 
is  COMLCAP2  which  is  an  UPDATE  COMDECK  containing  many  *CALL  directives  to  other 
LCAP2  COMDECKs.  With  this  one  *CALL  directive  about  89  lines  of  source  code  for  20  common 
blocks  needed  to  run  LCAP2  will  be  inserted.  After  the  *CALL  directive  there  are  calls  to  the 
intialization  routines  INITO  and  MINITO.  Subroutine  INITO  is  a  general  initialization  routine  and 
MINITO  is  an  initialization  routine  for  matrices  and  vectors  used  by  the  DETRM  and  DTERM 
commands.  These  two  initialization  routines  were  not  combined  since  it  is  possible  to  reduce 
LCAP2  memory  size  requirements  if  the  DETRM  and  DTERM  commands  are  not  used.  User  code 
follows  these  initialization  routines.  The  routine  LEXIT  must  be  used  to  terminate  a  run,  or  the 
plot  buffer  will  not  be  flushed  (last  plot  will  be  incomplete)  when  plot  jobs  are  created. 


4.2  PRECMP  Precompiler 


Since  some  of  the  LCAP2  commands  require  many  lines  of  FORTRAN  statements  to  be  written 
by  the  user,  particularly  those  which  involve  the  input  of  array  data,  a  precompiler  PRECMP 
was  developed  to  aid  the  user  in  writing  the  required  FORTRAN  code.  For  example,  to  load  the 
following  polynomial, 


As5  +  Bs 4  +  A*Bs3  +  45s2  +  130s  +  500 


into  POLY3,  the  following  FORTRAN  statements  are  required. 


P0LYP(1)=5  “degree  of  polynomial” 

P0LYP(2)=500. 

P0LYP(3)=13O . 

P0LYP(4)=45 . 

P0LYP(5)=A*B 
P0LYP(6)=B 
P0LYP(7)=A 
CALL  PLDC(3) 


The  above  eight  lines  of  FORTRAN  code  can  also  be  written  by  PRECMP  using  the  following  two 
PRECMP  directive  statements. 

★POLYP  S  500.  130.  45.  A*B  B  A 

*PLDC  3 
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There  are  two  types  of  PRECMP  directives,  the  parameter  and  the  command  directives.  A  param 
eter  directive  is  used  only  for  entering  data  into  a  FORTRAN  variable.  In  the  example  above  the 
♦POLYP  directive  is  used  for  loading  in  polynomial  coefficients  into  the  FORTRAN  array  POLYP. 
A  command  directive  is  used  for  invoking  an  LCAP2  command.  In  the  example  above  the  *PLDC 
directive  is  used  for  loading  the  data  from  FORTRAN  array  POLYP  into  POLY3. 

A  typical  batch  LCAP2  job  setup  consists  of  a  set  of  control  cards  and  an  input  file.  If  PRECMP 
is  not  used,  the  input  file  is  read  directly  by  the  UPDATE  program  which  will  then  create  a 
FORTRAN  source  deck  ready  for  compilation.  If  PRECMP  is  used,  the  user’s  input  file  will  be 
read  one  record  at  a  time  by  PRECMP.  If  a  record  is  not  a  PRECMP  directive,  i.e.,  a  FORTRAN 
statement  or  an  UPDATE  directive,  it  will  be  copied  to  a  file  named  PCMPILE.  If  it  is  a  PRECMP 
directive,  the  directive  will  be  “cracked”  and  FORTRAN  statements  for  implementing  the  directive 
will  be  written  to  file  PCMPILE.  After  all  the  records  have  been  preprocessed,  the  file  PCMPILE 
is  rewound  and  used  as  the  input  to  the  UPDATE  program. 

The  typical  job  setup  was  described  in  terms  of  optionally  using  PRECMP  rather  than  including 
it  as  a  standard  procedure  for  preprocessing  a  user’s  input  file.  The  rationale  for  this  is  based  on 
the  slow  execution  time  of  the  PRECMP  program.  For  small  order  jobs,  the  execution  time  for 
PRECMP  can  be  as  long  as  the  execution  time  for  running  the  LCAP2  program.  This  is  due  to 
inefficient  execution  of  character  operations  by  the  CDC  and  CRAY  computers.  Thus,  the  use  of 
PRECMP  will  be  at  the  option  of  the  user.  Sample  job  setups  are  given  in  Chapter  5  for  the  CDC 
and  CRAY  computers. 

4.2.1  PRECMP  Directive  Format 

The  general  format  of  the  PRECMP  directive  is  shown  below  in  Table  4.1.  A  directive  must  begin 
with  the  master  control  character  in  column  one.  If  a  directive  statement  requires  more  than  one 
line,  two  consecutive  periods,  ..  are  used  as  a  continuation  character  to  designate  that  input  is 
to  follow  on  the  next  line.  Any  text  on  the  same  line  after  the  continuation  character,  though,  is 
ignored  by  PRECMP  and  is  considered  to  be  a  comment.  An  optional  character  !  can  be  used  to 
terminate  a  directive  statement  so  that  any  text  following  !  is  considered  to  be  a  comment.  Optional 
characters  or  parameters  for  PRECMP  directive  definition  are  enclosed  by  the  curly  braces,  {  }. 

The  directive  format  is  similar  to  the  directives  used  by  the  CDC  and  CRAY  UPDATE  programs. 
Since  the  output  of  PRECMP  is  used  as  input  to  UPDATE,  all  UPDATE  directives  and  their 
abbreviations  are  ignored  by  PRECMP. 
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Table  4.1:  Format  of  PRECMP  Directive 


*  I  Master  control  character  that  distinguishes  a  directive  from  a  text  line, 

keyword  i  Name  of  a  PRECMP  directive.  No  blanks  can  occur  between  the  master 


control  character  and  the  keyword;  a  comma  or  blank  terminates  the 
keyword.  UPDATE  keywords  or  their  abbreviations  are  ignored, 
p-list  Parameters  for  the  PRECMP  directive.  A  comma  or  blank(s)  separates 
parameters  in  p-list.  The  parameters  in  p-list  can  be  a  FORTRAN  ex¬ 
pression.  The  parameters  may  include  character  strings  enclosed  by  the 
apostrophe  character  as  in  ’  ’  or  by  the  quote  character  as  in  ”  ”.  These 
are  the  only  t  ype  of  arguments  that  can  contain  embedded  blanks.  For  di¬ 
rectives  +ROOTP,  *ROOTN,  and  *ROOTD,  the  parameters  may  include 
numerical  values  enclosed  by  the  left  and  right  parenthesis  characters  as 
in  (  ),  the  open  and  closed  square  brackets  as  in  [  ],  and  the  open  and 
closed  angle  brackets  as  in  <  >.  Parameters  in  p-list  can  include  op¬ 

tional  parameters  which  are  specified  in  a  sublist  denoted  by  {  }.  Some 
directives  have  no  parameters. 

Continuation  character  for  continuing  input  on  the  next  line.  However, 
any  text  after  ..  on  the  same  line  is  considered  to  be  a  comment. 

!  Optional  end  of  statement  character.  Any  text  after  !  on  the  same  line 

is  considered  to  be  a  comment. 

PRECMP  directives  are  defined  for  LCAP2  commands  and  parameters  and  „.e  summarized  in 
Sections  4.2.3  and  4.2.4,  respectively.  PRECMP  directives  are  also  defined  for  selecting  the  type 
of  output  produced  by  PRECMP.  They  are  described  in  Section  4.2.5. 

Descriptions  of  the  LCAP2  commands  are  found  in  the  Reference  in  Appendix  A.  The  arguments 
of  the  parameter  list,  p-list,  for  LCAP2  parameters  can  be  any  of  the  following  six  types  shown  in 
Figure  4.2.  (The  first  one  is  an  argument  which  is  not  enclosed  by  special  characters.) 


Table  4.2:  Types  of  P-list  Arguments 


A  number  (REAL  or  INTEGER)  or  a  FORTRAN  expression 

1 

Character  string  for  entering  FORTRAN  character  string 

t*  JJ 

Character  string  for  writing  out  comments  to  the  output  file. 

UB 

Pair  of  complex  number  in  (real,imag)  format  for  entering  root  information 

[  ] 

Pair  of  complex  number  in  (zeta, omega]  format  for  entering  root  information 

<  > 

Real  number  in  <tau>  format  for  entering  root  information 

The  character  string  enclosed  by  the  double  quote  ”...”  is  converted  to  a  FORTRAN  print  statement. 
This  argument  type  is  defined  to  aid  the  user  in  generating  comments  to  the  output  file.  It  is  an 
optional  argument  for  all  PRECMP  directives  but  is  omitted  from  the  formal  descriptor  for  each 
directive  for  the  sake  of  brevity.  This  argument  type  is  not  positional  and  may  appear  more  than 
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once  on  a  directive  statement. 


Examples  of  several  types  of  p-list  and  p-list  arguments  are  given  in  the  next  section. 

4.2.2  PRECMP  Examples 

Examples  are  presented  to  describe  several  types  of  p-list  and  p-list  arguments  used  by  the  PRECMP 
directives. 


Example  4.1 
Directive: 

Sample  Usage: 

Code  Generated:  CALL  SPADD(5,H1,3) 

LCAP2  Function:  SPTF5  =  SPTF„i  +  SPTF3 


♦  SPADD  i  j  k 
♦SPADD  5  HI  3 


Example  5.2 
Directive: 

Sample  Usage: 
Code  Generated: 


♦SZXFM  i  j  {  sampt  delay  zoh  } 
note:  {  ...  }  designates  optional  parameter  list 

*SZXFM  46.5 
SAMPT= . 5 


CALL  SZIFH(4,6) 

note:  since  optional  values  are  not  specified  for  delay  and 
zoh,  previous  or  default  values  are  assumed 
LCAP2  Function:  ZPTF4  =  z  transform  of  SPTFg 


Example  4.3 
Directive: 

Sample  Usage: 
Code  Generated: 


♦  SZXFM  i  j  {  sampt  delay  zoh  } 

♦SZXFM  "Z-TRAIS  OF  PLAIT"  4  6  .5  .1*SAHPT 
PRIHT*, 'Z-TRAHS  OF  PLAIT’ 

SAMPT= . 5 
DELAY=.l* SAMPT 
CALL  SZXFM(4,6) 


Example  4.4 
Directive: 

Sample  Usage: 
Code  Generated: 


♦  SAVE  file_name  iprn 
♦SAVE  ’DATA1 ’  1  "DATA  FOR  COIFIG  3X" 
PRIIT^ , ’DATA  FOR  COIFIG.  31’ 

CALL  SAVE(’DATA1’,1) 


Example  4.5 
Directive: 


♦ROOTP  {’HIGH’}  gain  r-list 


r-list  is  a  root  list  whose  arguments  can  be  any  of  the  following  types: 

a  for  real  root  in  (^  +  1)  factored  form.  If  a  =  0,  the  factored 

form  is  (s). 


Sample  Usage: 


Example  4.6 
Directive: 

Sample  Usage: 


(a,b) 


(zeta,  omega 


<tau> 


for  complex  root  pair  in  (  ^  4  1 ) (  ‘  1)  factored  form 

for  complex  root  pair  in  ( — — — y  4-  -- -  4  1 )  factored  form.  If 

omega=0,  the  factored  form  is  (s2). 

for  real  root  in  ( tau  s  4  1)  factored  form.  If  tan-0,  the  root  is 
not  defined. 


*ROOTP  100.  -1  (-2. ,3.)  [X,Y]  <TAU>  0. 


This  directive  will  enter  root  data  into  the  array  ROOTP  for  the  following 
polynomial 


(100.)(«+  +  l)(^  +  1)(£  +  ^  +  1  )(TAU»  +  1)(») 

The  actual  code  generated  is  a  series  of  FORTRAN  subroutine  calls  which  (l) 
converts  the  various  root  formats  of  r- list  into  the  appropriate  one  used  by  array 
POLYP,  (2)  counts  the  number  of  actual  roots  to  be  entered,  and  (3)  convert, 
if  necessary,  a  ’’high  order  gain”  into  a  ’’low  order  gain”  which  is  required  for 
entering  root  data.  The  details  on  the  code  generated  by  the  *ROOTP  directive 
are  given  in  Section  4.2.4. 


♦  ROOTP  {’HIGH’}  gain  r-list 


♦ROOTP  ’HIGH’  200.  -1  (-2., 3.)  [X,Y]  <TAU>  0. 


This  directive  will  enter  root  data  into  the  array  ROOTP  for  the  following 
polynomial 

(200. )(a  4  1  )(a  4  2  -  j3)(s  4  2  +  j3)(s2  +  2X  ♦  Ys  +  Y2)(s  4  — L^)(j) 

See  Section  4.2.4  for  the  details  on  how  the  high  order  coefficient,  200,  is  con¬ 
verted  to  the  low  order  coefficient  used  to  store  root  data  in  LCAP2. 
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4.2.3  Summary  of  LCAP2  PRECMP  Command  Directives 

The  following  is  an  alphabetized  list  of  the  PRECMP  command  directives.  Description  '  f  these 
directives  is  given  in  Appendix  A. 

*BlCEQ  label  indx  isptf  iyin  nycin 

•  BlEICJ  i 
*B  l  END 
*Bl  FREQ 

•  UlINIT  lal>el  oldnew  ncblk 

•  BiLOAD  file  name 
*BlLO(T  indx 

•  BlSAYE  file_name 
*BlTF  i 

•  BITIME 

•  B2CEQ  label  indx  isptf  delay  iyin  nycin  nxsin 

*B2DEQ  label  indx  izptf  dsampt  delay  iyin  nycin  nydin  nxsin 

•  R2EIG  i 
♦B2FREQ 

•  B2END 

*B2IN1T  label  oldnew  ncblk  ndblk  nshblk 
*B2LOAD  filemame 
*B2LOCI  blktyp  indx 

•  B2SAVE  filename 

•  B2SEQ  label  indx  ssampt  delay  nydin  nxsir. 

*B2TF  i 

+  B2TIME 
•CPYPS  i  j  k 
*CPYP\V  i  j  k 
*CPYPZ  i  j  k 
♦CPYSP  i  j  k 
*CPYWP  i  j  k 
*CPYZP  i  j  k 

•  DETRM  i  {  mxm  mdeg  } 

*l)TERM  i  j  {  mxm  mdeg  } 

•  LOAD  file. name  iprn 
*PADD  i  j  k 
*PDEL  i 

*PEQF'  i  j 
*PLDC  i 
+PLDR  i 
*PMPY  i  j  k 

•  POLY  i 
•PUTS  i 
«PSUB  i  j  k 

•  SAVE  file.name  iprn 

•SELCR  i 

•  SFREQ  i 
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*SLOCI  i 

*SNORM  i  {  nrmhi  knorm  } 

♦  SPADD  i  j  k 
*SPCLSLP  i  j  k 
*SPDEL  i 
*SPDIV  i  j  k 
.SPEQU  i  j 
*SPLDC  i 
*SPLDR  i 
*SPMPY  i  j  k 
*SPRTS  i 

♦  SPSUB  i  j  k 
*SPTF  i 

*STIME  i  {  ttype  tmagn  tzero  tend  tdelt  } 
♦SWMRX  i  j  {  sampt  delay  zoh  ntger  } 

♦  SWXFM  i  j  {  sampt  delay  zoh  } 

*SZMRX  i  j  {  sampt  delay  zoh  ntger  } 
*SZXFM  i  j  {  sampt  delay  zoh  } 

♦WELCR  i 

*WFREQ  i  {  sampt  } 

*WLOCI  i 

♦  WMRFQ  i  {  sampt  ntger  } 

*WMRXFM  i  j  {  sampt  ntger  } 

*WNORM  i  {  nrmhi  knorm  } 

♦WPADD  i  j  k 

♦  WPCLSLP  i  j  k 
*WPDEL  i 

+  WPDIV  i  j  k 
*WPEQU  i  j 
+WPLDC  i 

♦  WPLDR  i 

* WPMPY  i  j  k 
*VVPRTS  i 

♦  WPSUB  i  j  k 
*WPTF  i 

♦WSXFM  i  j  {  sampt  } 

*YVZXFM  i  j 

♦  ZELCR  i 

♦  ZFREQ  i  {  sampt  } 

♦  ZLOCI  i 

*ZMRFQ  i  {  sampt  ntger  } 

♦  ZMRXFM  i  j  {  sampt  ntger  } 

*ZNORM  i  {  nrmhi  knorm  } 

*ZPADD  i  j  k 

★ZPCLSLP  i  j  k 
*ZPDEL  i 
*ZPDIV  i  j  k 
♦ZPEQU  i  j 
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*ZPLDC  i 

♦  ZPLDR  i 

♦  ZPMPY  i  j  k 
*ZPRTS  i 
♦ZPSUB  i  j 

♦  ZPTF  i 

*ZSXFM  i  i  {  sampt  } 

♦  ZTIME  i  {  sampt  ttype  tmagn  tend  } 
♦ZVCNG  i  j  {  ntger  } 

*ZWXFM  1  j 


4.2.4  Summary  of  LCAP2  PRECMP  Parameter  Directives 

PRECMP  parameter  directives  are  used  to  simplify  the  input  of  LCAP2  parameters  which  are 
arrays.  Except  for  the  directives,  *ROOTP,  *ROOTN,  and  *ROOTD,  all  PRECMP  directives  for 
LCAP2  parameter  arrays  will  generate  a  sequence  of  FORTR  AN  statements  to  load  the  arguments 
of  the  directive  into  an  array  starting  in  element  one.  For  example,  the  directive: 

*P0LYN  2  W1*W1  2 . *Z1*W1  1 


will  generate  the  following  FORTRAN  code, 

P0LYN(1)=2 

P0LYB(2)=W1*W1 

P0LYH(3)=2.*Z1*W1 

P0LYH(4)=1 


The  following  is  a  list  of  PRECMP  directives  for  LCAP2  parameters  which  are  arrays. 


♦FREQl  fstart  fend  fdelta 
*FREQ2  fstart  fend  fdelta 
*FREQ3  fstart  fend  fdelta 
♦FREQ4  fstart  fend  fdelta 
*FREQ5  fstart  fend  fdelta 

♦  KGAIN  gi  g2  ...  g„ 

♦  IY CIN  ii  i2  ...  in 

♦  I  YD  IN  n  i2  ...  in 
*IXSIN  i,  i2  ...  in 

♦  POLYP  ndeg  a0  ...  a*^ 

♦  POLYD  ndeg  a0  aj  ...  a ndeg 

+  POLYN  ndeg  ao  a!  ...  a ndeg 

♦  OMEGA  UJj  U?2  ...  ^nornega 

♦  ROOTP  {’HIGH’}  gain  r-list 
♦ROOTD  {’HIGH’}  gain  r-list 

♦  ROOTN  {’HIGH’}  gain  r-list 


“see  command  SFREQ  in  Appendix  A”  for 
definition  of  fstart,  fend,  and  fdelta” 


“where  n  <  25” 

“where  n  <  MDIMYC  or  NDIMYC,  see  command  BlCEQ  or 
B2CEQ  in  Appendix  A” 

“where  n  <  NDIMYD,  see  command  B2DEQ  in  Appendix  A” 
“where  n  <  NDIMXS,  see  command  B2SEQ  in  Appendix  A” 
“where  ndeg  <  MXPDEG 


“where  nomega  <  20” 
“see  next  paragraph” 

V 
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In  Section  6.1.2,  the  format  used  in  LCAP2  for  storing  root  data  into  a  complex  array  is  presented. 
For  a  polynomial  with  n  roots,  the  roots  are  to  be  stored  in  elements  2  through  n+1  of  a  complex 
array.  The  number  of  roots,  n,  is  to  be  stored  in  the  real  part  of  element  1.  The  imaginary  part  of 
element  1  is  used  to  store  a  “gain”  which  can  be  used  to  define  a  polynomial  with  the  same  set  of 
roots.  This  “gain”  is  defined  in  LCAP2  as  the  low  order  nonzero  coefficient  of  the  polynomial. 

In  general,  the  root  data  which  the  analyst  will  be  working  with  will  not  always  be  in  this  format. 
The  PRECMP  directives  *ROOTP,  *ROOTD,  and  *ROOTN  will  enable  the  user  to  enter  root  data 
with  a  more  general  format  by  converting  the  user  data  into  the  LCAP2  format  described  above. 
The  PRECMP  precompiler  will  do  this  conversion  by  generating  a  series  of  calls  to  subroutines 
RTREAL,  RTCPLX,  RTZOMG,  RTTAU  and  RTGAIN.  It  also  uses  temporary  variable  IZZZZ  to 
keep  track  of  the  number  of  roots  that  are  to  be  entered.  The  code  that  is  written  by  PRECMP 
to  implement  this  conversion  is  described  for  the  *POLYP  directive  below1: 

1.  After  the  *POLYP  keyword  has  been  detected,  read  the  next  argument  after  the  keyword. 

•  If  it  is  ’HIGH’,  set  an  internal  flag  to  indicate  that  the  “gain”  that  will  be  entered  later 
will  be  the  “high  order  coefficient”  instead  of  the  “low  order  nonzero  coefficient”.  Then 
go  to  Step  2. 

•  If  it  is  not  ’HIGH’,  go  to  Step  3. 

2.  Read  the  next  argument. 

3.  Write  the  following  FORTRAN  statements: 

ZZGAIN  =  current  argument 

IZZZZ  =  0  “initialize  counter” 

4.  Read  the  next  argument. 

•  If  there  are  no  more  arguments,  go  to  Step  9. 

•  If  the  argument  is  of  the  form,  a  ,  go  to  Step  5. 

•  If  the  argument  is  of  the  form,  (a,b)  ,  go  to  Step  6. 

•  If  the  argument  is  of  the  form,  [zeta, omega]  ,  go  to  Step  7. 

•  If  the  argument  is  of  the  form,  <tau>  ,  go  to  Step  8. 

5.  Write  the  following  FORTRAN  statements  and  then  go  to  Step  4. 

ZZREAL  =  a  “where  a  is  from  the  current  argument” 

CALL  RTREAL(ROOTP, IZZZZ, ZZREAL)  “IZZZZ  will  be  incremented  by  1” 

6.  Write  the  following  FORTRAN  statements  and  then  go  to  Step  4. 

ZZREAL  =  a  “where  a  is  from  the  current  argument” 

ZZIMAG  =  b  “where  b  is  from  the  current  argument” 

CALL  RTCPLX(ROOTP, IZZZZ, ZZREAL, ZZIMAG)  “IZZZZ  will  be  incremented  by  2” 

’The  code  implemented  for  the  *ROOTD  and  *ROOTN  directives  is  similar  to  *ROOTP  except  that  ROOTD  or 
ROOTN  is  substituted  for  ROOTP. 
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7.  Write  the  following  FORTRAN  statements  and  then  go  to  Step  4. 


ZZZETA  =  zeta  “where  zeta  is  from  the  current  argument” 

ZZOMEG  =  omega  “where  omega  is  from  the  current  argument” 

CALL  RTZOMG(ROOTP, IZZZZ, ZZZETA, ZZOMEG)  “IZZZZ  will  be  incremented  by  2” 


8.  Write  the  following  FORTRAN  statements  and  then  go  to  Step  4. 

ZZTAU  =  tau  “where  tau  is  from  the  current  argument” 

CALL  RTRE AL(ROOTP, IZZZZ, ZZTAL)  “IZZZZ  will  be  incremented  by  1” 


9.  Write  one  of  the  following  FORTRAN  statement  which  completes  the  “cracking”  of  the 
*ROOTP  directive. 

CALL  RTGAIN(ROOTP, IZZZZ, 0, ZZGAIN)  “if  ’HIGH’  was  not  entered” 

CALL  RTG  AIN(ROOTP, IZZZZ,  1, ZZGAIN)  “if  ’HIGH’  was  entered” 


In  Steps  5  through  8,  the  calls  to  subroutines  RTREAL,  RTCPLX,  RTZOMG,  or  RTTAU  will 
convert  the  current  argument  to  the  proper  root  format  expected  by  LCAP2  and  store  it  into 
ROOTP(IZZZZ+2).  These  subroutines  will  then  increment  IZZZZ  either  by  1  or  2.  In  Step 
9  subroutine  RTGAIN  will  set  IZZZZ,  the  number  of  roots  begin  entered,  into  the  real  part  of 
ROOTP(l).  An  internal  flag  will  be  checked  to  see  if  ZZGAIN  is  the  low  order  nonzero  coefficient 
or  the  high  order  coefficient  of  the  polynomial.  If  the  argument  is  zero,  the  imaginary  part  of 
ROOTP(l)  will  be  set  equal  to  ZZGAIN.  If  it  is  not,  the  high  order  coefficient  will  be  converted  to 
the  low  order  nonzero  coefficient  and  stored  into  the  imaginary  part  of  ROOTP(l).  This  conversion 
is  computed  as: 

low  order  nonzero  coefficient  =  ZZGAIN  *  product  of  (-  nonzero  roots) 


4.2.5  PRECMP  Directives  for  Selecting  Type  of  Output 

There  are  four  PRECMP  directives  for  selecting  th>  type  of  output  produced  by  PRECMP.  The 
first  two,  *NLIST  and  +NOUTPUT,  must  be  invoked  at  the  beginning  of  the  input  file.  The  last 
two,  *SUPRESS  and  *NSTJPRESS,  can  be  invoked  anywhere  in  the  input  file. 


Directive: 


*NLIST 


By  default,  all  the  input  file  (card  images)  to  PRECMP  will  be  printed  to  the 
output  file  with  a  sequence  number.  However,  if  the  *NLIST  directive  is  used, 
the  input  file  is  not  printed  out.  Unless  the  input  is  exceptionally  long  and  the 
job  is  a  production  run,  use  of  this  directive  is  not  recommended. 


Directive: 


♦NOUTPUT 
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Directive: 


Directive: 


PRECMP  will  create  file  PCMPILE  which  contains  (1)  all  of  the  users’  in¬ 
put  data  for  program  UPDATE  and  (2)  FORTRAN  statements  generated  from 
“cracking”  the  PRECMP  directives.  PCMPILE  is  the  input  file  for  the  FOR¬ 
TRAN  compiler.  By  default,  the  file  PCMPILE  will  be  printed  to  the  output 
file.  However,  since  most  users  will  be  compiling  the  FORTRAN  code  with  the 
list  option,  there  is  no  need  to  print  out  the  file  PCMPILE  separately.  Thus, 
the  *NOUTPUT  directive  should  normally  be  used. 


I  *SUPRESS 


When  PRECMP  “cracks”  a  PRECMP  directive,  it  first  creates  FORTRAN 
comment  statement(s)  which  contains  a  copy  of  the  PRECMP  directive  so  that 
the  output  of  a  FORTRAN  compilation  will  show  where  the  PRECMP  directive 
was  invoked.  Then  it  will  generate  FORTRAN  statements  which  will  implement 
the  PRECMP  directive.  In  some  cases  the  code  generated  may  be  quite  long 
and  of  no  interest  to  the  typical  user.  The  *SUPRESS  directive  will  suppress 
the  listing  of  these  PRECMP -generated  FORTRAN  codes  in  the  output  of  the 
FORTRAN  compilation.  It  does  this  by  using  the  following  FORTRAN  com¬ 
piler  directives  that  control  the  listing  of  its  output: 


On  the  CRAY  the  directive  to  stop  the  listing  is: 


CDIR$  HOLIST 


On  the  CDC  the  directive  to  stop  the  listing  is: 


C  LIST(S=0) 


Since  only  the  PRECMP  generated  FORTRAN  code  is  to  be  suppressed  when 
the  *SUPRESS  directive  is  invoked,  the  FORTRAN  compiler  must  be  directed 
to  resume  listing  after  each  set  of  PRECMP  FORTRAN  code  is  generated.  The 
FORTRAN  compiler  directives  to  start  the  listing  are: 


On  the  CRAY  the  directive  to  start  the  listing  is: 


CDIRl  LIST 


On  the  CDC  the  directive  to  start  the  listing  is: 


C  LIST(S=1) 


Thus,  when  a  PRECMP  directive  is  being  “cracked”,  PRECMP  will  check  to 
see  if  +SUPRESS  has  been  invoked.  If  it  has,  it  will  first  write  out  a  FOR¬ 
TRAN  compiler  directive  to  file  PCMPILE  to  stop  the  listing.  Then  after  the 
last  PRECMP-generated  FORTRAN  code  has  been  written  for  that  particular 
directive,  a  FORTRAN  compiler  directive  is  written  to  file  PCMPILE  to  restart 
the  listing. 


♦NSUPRESS 
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The  *NSUPRESS  directive  is  used  to  negate  the  *SUPRESS  directive  so  that 
all  PRECMP-generated  code  will  be  listed  by  the  FORTRAN  compiler.  Use 
of  *SUPRESS  and  *NSUPRESS  directives  will  enable  the  user  to  selectively 
suppress  the  listing  of  PRECMP  generated  output. 
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Chapter  5 


Job  Setup 


A  job  setup  consists  of  a  set  of  control  cards  and  an  input  file.  Since  the  use  of  the  preprocessor 
program  PRECMP  is  optional1  and  batch  LCAP2  can  be  run  on  either  the  CRAY,  CDC  MFB,  or 
CDC  MFX  computers,  there  are  six  different  typical  setups  that  can  be  used.  They  are  all  available 
to  the  user  as  an  indirect  file  on  CDC  INTERCOM  by  typing  the  following  command: 

IGET.file  Jiame/PF=ZL2USER, ID=9487 
where  filename  and  its  description  is  given  below  in  Table  5.1. 


Table  5.1:  Sample  Deck  Setups 


Sample  Deck  Setups 

file_name 

Description 

CL2CC 

For  CRAY  Without  PRECMP 

CL2CCPR 

For  CRAY  With  PRECMP 

BL2CC 

For  CDC  MFB  Without  PRECMP 

BL2CCPR 

For  CDC  MFB  With  PRECMP 

XL2CC 

For  CDC  MFX  Without  PRECMP 

XL2CCPR 

- i 

For  CDC  MFX  With  PRECMP 

Each  of  these  setups  includes  all  the  necessary  control  cards  for  generating  plots.  The  control  card 
for  compilation  includes  the  debug  option.  Not  included  are  the  control  cards  needed  for  attaching 
and  saving  files  associated  with  the  restart  capability.  That  will  be  discussed  in  another  part  of 
the  manual.  Currently  there  are  two  versions  of  LCAP2  on  the  CRAY,  a  regular  and  a  large  model 
version.  Sections  5.1  and  5.2  describe  how  they  are  selected. 


'See  Section  4.2 
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5.1  Setup  for  CRAY  without  PRECMP 


The  following  is  a  typical  deck  setup  CL2CC.  Two  different  versions  of  the  LCAP2  source  and 
binary  libraries  are  available.  They  are  selected  by  the  ID  parameter  on  the  ACCESS  statements 
for  files  CLCAP2PL  and  CLCAP2LIB.  In  the  control  cards  below,  the  regular  version  is  selected  by 
ID=MX49  (max.  polynomial=49).  For  the  large  model  version  of  LCAP2,  use  ID=MX100  (max. 
poly  nomial = 1 0  0 ) . 


...  (job  card)  i.a.,  JOB. JI=. . . ,US=. . . ,MFL=700000,T=30. 

. . .  (account  card)  . . . 

. . .  (PRT  card)  . . . 

* 

■"FILE  CL2CC,  (I GET  CL2CC/PF=ZL2USER, ID=9487) 

♦SAMPLE  COSTROL  CARD  SETUP  FOR  CRAY  WITHOUT  PRECOMPILER 
* 

ACCESS , DH=$PL . PDH-CLCAP2PL , 0WI=9487 , ID=MX49 . 

UPDATE.CD.ED.ID.il. 

CFT ,  IMCPL ,  011=11 ,  DEBUG . 

ASSIGI , DI=DAP0LY , U . A=FT84 . 

ASSIGI, DI=DASPTF , U , A=FT8S . 

ASSIGI . DI=DAWPTF . U , A=FT86 . 

ASSIGI . DI=DAZPTF , U . A=FT87 . 

ACCESS . DI=$0BL . PDI=CLCAP2LIB . 0WI=9487 , ID=MX49 . 

ACCESS .  DIMPLOT ,  PDI=ASCPLOTLIB ,  OWI=PUBLIC . 

SEGLDR , GO . CMD=  * BII=$BLD ; LIB=$0BL , IPLOT ; MAP=PART * . 

HARDCPY , ST=IBHD8 . 

EXIT. 

DUMP JOB. 

DEBUG . 

♦EOR 

♦IDEIT  XXXIX 

PROGRAM  LCAP2 ( IIPUT , OUTPUT , TAPE5= IIPUT , TAPE6=0UTPUT) 

♦CALL  C0MLCAP2 

♦♦**♦*♦♦♦♦♦♦  IISERT  AIY  101  EXECUTABLE  STATEMEITS  HERE  **************** 
CALL  IIITO 
CALL  MIIITO 

C*** ***********  BEGII  USER  CODE  HERE  FOR  HAII  PROGRAM  ***************** 
C 

C  usar  coda 
C 

C* ****** *********  EID  OF  USER  CODE  FOR  MAII  PROGRAM  ******************* 
CALL  LEXIT 
EID 
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5.2  Setup  for  CRAY  with  PRECMP 


The  following  is  a  typical  deck  setup  file  CL2CCPR.  Two  different  versions  of  PRECMP  and  the 
LCAP2  source  and  binary  libraries  are  available.  They  are  selected  by  the  ID  parameter  on  the 
ACCESS  statements  for  files  CLCAP2PRECMP,  CLCAP2PL  and  CLCAP2LIB.  In  the  control 
cards  below,  the  regular  version  is  selected  by  ID=MX49  (max.  polynomial=49).  For  the  large 
model  version  of  LCAP2,  use  ID  =  MX100  (max.  polynomial =100). 


...  (job  card)  i.e.,  J0B,JN=. . . ,US=. . . ,MFL=700000.T=30. 

. . .  (account  card)  . . . 

. . .  (PRT  card)  . . . 

* 

♦FILE  CL2CCPR,  (I GET  CL2CCPR/PF=ZL2USER,ID=9487) 

♦SAMPLE  CONTROL  CARD  SETUP  FOR  CRAY  WITH  PRECOMPILER 
* 

ACCESS , DN=X . PDN=CLCAP2PRECHP . 0WN=9487 . ID=MX49 . 

X. 

REWIND, DN=PCMPLIE. 

IF( JO.EQ . 'BAD ’L) 

♦ - >FATAL  ERROR  IN  PRECMP 

COPYF , I=PMCPILE, 0=$0UTPUT,S=i . 

EXIT. 

ENDIF. 

ACCESS , DN=$PL , PDN=CLCAP2PL , 0WN=9487 , ID=MX49 . 

UPDATE , I=PCMPILE , CD . ED , ID , IN . 

CFT , I=$CPL , 0N=IX , DEBUG . 

ASSIGN . DN=DAP0LY,U, A=FT84 . 

ASSIGN . DN=DASPTF,U, A=FT85 . 

ASSIGN , DN=DAWPTF , U , A=FT86 . 

ASSIGN . DN=DAZPTF , U , A=FT87 . 

ACCESS . DN=$QBL , PDN=CLCAP2LIB , 0WN=9487 , ID=MI49 . 

ACCESS , DN=$PL0T,PDN=ASCPL0TLIB , 0WN=PUBLIC . 

SEGLDR, GO , CMD= ’ BIN-$BLD ; LIB=$0BL , $PL0T; MAP=PART  * . 

HARDCPY , ST=IBMD8 . 

EXIT. 

DUMP JOB . 

DEBUG . 

♦EOR 

♦NOUTPUT 
♦IDENT  XXXXX 
♦INSERT  START. 1 

PROGRAM  LCAP2 ( INPUT , OUTPUT , TAPE5=INPUT , TAPE6=0UTPUT) 

♦CALL  C0MLCAP2 

♦♦♦♦♦♦♦♦♦♦♦♦  INSERT  ANY  NON  EXECUTABLE  STATEMENTS  HERE  ♦♦♦♦♦♦♦♦♦♦♦♦♦♦** 
CALL  INITO 
CALL  MINITO 

C **************  BEGIN  USER  CODE  HERE  FOR  MAIN  PROGRAM  ***************** 
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c 

C  user  code 
C 


0****************  end  of  user  code  for  main  program  ******************* 


CALL  LEXIT 


END 


5.3  Setup  for  CDC  MFB  without  PRECMP 

The  following  is  a  typical  deck  setup  from  file  BL2CC. 

...  (job  card)  i.e.,  D30S,STMFB,P3000,EC60,T=70. 

. . .  (account  card)  . . . 

. . .  (XMIT  card)  . . . 

COMMENT. 

COMMENT.  FILE  BL2CC,  (IGET  BL2CC/PF=ZL2USER,ID=9487) 

COMMENT.  SAMPLE  CONTROL  CARD  SETUP  FOR  CDC  MFB  WITHOUT  PRECOMPILER 
COMMENT. 

ATTACH (OLDPL, 8BLCAP2PL , ID=948 7 ) 

UPDATE. 

FTN5 ( I=COMPILE , LO . PL , DB=PMD ) 

RETURN (OLDPL) 

ATTACH(LCAPLIB , 8BLCAP2LIB , ID=9487) 

ATTACH(PL0TLIB,FTN5PL0TLIB) 

RFL,EC=60. 

LDSET(LIB=LCAPLIB/PLOTLIB) 

LDSET (PRESET=ZERO ) 

LG0(*0P=AF) 

REWIND, ZZZZZMP. 

COPYBF , ZZZZZMP , OUTPUT . 

LIBRARY (PLOTLIB) 

HARDCPY , ST=IMBD8 . 

EXIT. 

REWIND, ZZZZZMP. 

COPYBF , ZZZZZMP , OUTPUT . 

*E0R 

♦IDEHT  XXXX 
* INSERT  START. 1 

PROGRAM  LCAP2 ( INPUT , OUTPUT , TAPE5= INPUT , TAPE6=0UTPUT ) 

♦CALL  C0MLCAP2 

************  IHSERT  ANY  NON  EXECUTABLE  STATEMENTS  HERE  **************** 
CALL  INITO 
CALL  MINITO 

C**************  BEGIN  USER  CODE  HERE  FOR  MAIN  PROGRAM  ***************** 
C 

C  user  code 
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1 


c 

c* ****** *********  end  of  user  code  for  main  program  ******************* 

CALL  LEXIT 
END 


j.4  Setup  for  CDC  MFB  with  PRECMP 


The  following  is  a  typical  deck  setup  BL2CCPR. 


...  (job  card)  i.e.,  D305 , STMFB ,P3000,EC60,T=70. 

...  (account  card)  ... 

.  .  .  (XMIT  card)  . . . 

COMMENT. 

COMMENT.  FILE  BL2CCPR,  (IGET  BL2CCPR/PF=ZI.2USER, ID=9487) 
COMMENT.  SAMPLE  CONTROL  CARD  SETUP  FOR  CDC  MFB  WITH  PRECOMPILER 
COMMENT. 

ATTACH(X,8BLCAP2PRECMP,ID=9487) 

X. 

RETURN ,X. 

REWIND. PCMPILE. 

IFE,FILE(TAPE50 .AS) .NOFILE. 

REMARK. PRECMP  SUCCESSFULLY  EXECUTED 
ELSE. NOFILE. 

REMARK. - >FATAL  ERROR  15  PRECMP 

COPYSBF , PCMPILE , OUTPUT . 

ABORT. 

ENDIF, NOFILE. 

ATTACH(OLDPL . 8BLCAP2PL , ID=9487) 

REQUEST (NEWPL , *PF ) 

UPDATE (I=PCMPILE) 

FTN5 ( I=COMPILE , LO , PL , DB=PHD) 

RETURN (OLDPL) 

ATTACH(LCAPLIB . 8BLCAP2LIB , ID=9487) 

ATTACH(PLOTLIB.FTNBPLOTLIB) 

RFL,EC=60. 

LDSET(LIB=LCAPLIB/PLOTLIB) 

LDSET ( PRESET=ZERO ) 

LG0(*0P=AF) 

REWIND. ZZZZZMP. 

COPYBF , ZZZZZMP , OUTPUT . 

LIBRARY(PLOTLIB) 

HARDCPY , ST=IBMD8 . 

EXIT. 

REWIND, ZZZZZMP. 

COPYBF , ZZZZZMP . OUTPUT . 

*EOR 
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♦N OUTPUT 
WIDEST  IIII 
♦INSERT  START. 1 

PROGRAM  LCAP2 ( INPUT , OUTPUT , TAPES= INPUT ,TAPE6= OUTPUT) 

•CALL  C0MLCAP2 

************  INSERT  ANY  NON  EXECUTABLE  STATEMENTS  HERE  **************** 
CALL  INITO 
CALL  MINITO 

C**************  BEGIN  USER  CODE  HERE  FOR  MAIN  PROGRAM  ♦♦♦***♦***♦•***** 

c 

C  user  code 
C 

C****************  END  OF  USER  CODE  FOR  MAIN  PROGRAM  ******************* 
CALL  LEXIT 
END 


5.5  Setup  for  CDC  MFX  without  PRECMP 

The  following  is  a  typical  deck  setup  from  file  XL2CC. 

...  (job  card)  i.e.,  D305,STMFX,P3000,MS300000,ML40.T=30. 

. . .  (account  card)  . . . 

...  (XMIT  card)  ... 

COMMENT. 

COMMENT.  FILE  XL2CC,  (IGET  XL2CC/PF=ZL2USER,ID=9487) 

COMMENT.  SAMPLE  CONTROL  CARD  SETUP  FOR  CDC  MFX  WITHOUT  PRECOMPILER 
COMMENT. 

ATTACH (OLDPL , 8XLCAP2PL , ID=9487) 

UPDATE. 

FTN5 ( I=C0MPILE , LO . PL , DB=PMD ) 

RETURN (OLDPL) 

ATTACH (PL0TLIB.FTN5PL0TL IB) 

ATTACHUCAPLIB ,  8XLCAP2LIB ,  ID=9487) 

LIBRARY (LCAPLIB .PLOTLIB) 

LDSET (PRESET=ZERO ) 

LGO(*OP=AF) 

REWIND. ZZZZZMP. 

COPYBF , ZZZZZMP , OUTPUT . 

LIBRARY(PLOTLIB) 

HARDCPY , ST=IBMD8 . 

EXIT. 

REWIND .ZZZZZMP. 

COPYBF , ZZZZZMP , OUTPUT . 

•EOR 

•IDENT  XXXX 
♦INSERT  START. 1 


PROGRAM  LCAP2 ( INPUT , OUTPUT , TAPE5=INPUT , TAPE6=OUTPUT) 

♦CALL  C0MLCAP2 

************  ihsert  any  non  executable  statements  here  **************** 

CALL  INITO 
CALL  MINITO 

c**************  begin  user  code  here  for  main  program  ***************** 

c 

C  user  code 
C 

c****************  end  of  user  code  for  main  program  ******************* 

CALL  LEXIT 
END 


5.6  Setup  for  CDC  MFX  with  PRECMP 

The  following  is  a  typical  deck  setup  from  file  XL2CCPR. 


...  (job  card)  i.e.,  D305,STMFX,P3000,MS300000,ML40,T=30. 

. . .  (account  card)  . . . 

. . .  (XMIT  card)  . . . 

COMMENT. 

COMMENT.  FILE  XL2CCPR,  (IGET  XL2CCPR/PF=ZL2USER, ID=9487) 
COMMENT.  SAMPLE  CONTROL  CARD  SETUP  FOR  CDC  MFX  WITH  PRECOMPILER 
COMMENT. 

ATTACH(X , 8XLCAP2PRECMP , ID=9487) 

X. 

RETURN. X. 

REWIND. PCHPILE. 

IFE ,FILE(TAPE50 , AS) .NOFILE. 

REMARK. PRECMP  SUCCESSFULLY  EXECUTED 
ELSE, NOFILE. 

REMARK. - >ERR0R  IN  PRECMP 

COPYSBF , PCMPILE , OUTPUT . 

ABORT. 

ENDIF, NOFILE. 

ATTACH ( OLDPL , 8XLCAP2PL , ID=9487) 

REQUEST(NEWPL,*PF) 

UPDATE (I=PCMPILE) 

FTN5(I=C0MPILE,L0 ,PL,DB=PMD) 

RETURN (OLDPL) 

ATTACH (PLOTL IB, FTN5PL0TL IB) 

ATTACH(LCAPLIB , 8XLCAP2LIB . ID=9487) 

LIBRARY (LCAPLIB .PLOTLIB) 

LDSET(PRESET=ZERO) 

LGO(*OP=AF) 

REWIND, ZZZZZMP. 
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COPYBF , ZZZZZMP , OUTPUT . 

LIBRARY(PLOTLIB) 

HARDCPY , ST=IBMD8 . 

EXIT. 

REWIND, ZZZZZMP. 

COPYBF , ZZZZZMP , OUTPUT . 

*EOR 

♦NOUTPUT 
♦IDENT  XXXX 
♦INSERT  START. 1 

PROGRAM  LCAP2 ( INPUT , OUTPUT , TAPE5= INPUT ,TAPE6=0UTPUT) 

♦CALL  COMLCAP2 

************  INSERT  ANY  NON  EXECUTABLE  STATEMENTS  HERE  **************** 
CALL  INITO 
CALL  MINITO 

C**************  BEGIN  USER  CODE  HERE  FOR  MAIN  PROGRAM  ***************** 

C 

C  user  code 
C 

C****************  END  OF  USER  CODE  FOR  MAIN  PROGRAM  ******************* 
CALL  LEXIT 
END 
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Chapter  6 


Data  Structures 


Four  different  data  structures  are  defined  for  use  in  LCAP2.  They  are  (1)  LCAP2  parameters,  (2) 
LCAP2  polynomials,  (3)  LCAP2  transfer  functions,  and  (4)  transfer  function  connection  blocks. 
LCAP2  parameters  are  FORTRAN  variables  in  common  blocks  DBASE,  POLYCM,  ROOTCM, 
and  MATRIX1  used  for  entering  data  values  used  by  LCAP2  commands.  LCAP2  polynomials 
and  transfer  functions  are  data  structures  which  the  user  can  access  or  reference  by  indices  in 
an  LCAP2  command  Transfer  function  connection  blocks  are  data  structures  which  are  used  to 
connect  transfer  function  blocks  for  automated  transfer  function  analysis. 


8.1  LCAP2  Parameters 

LCAP2  parameters  are  FORTRAN  variables  in  common  block  DBASE  used  for  entering  data.  A 
complete  list  of  these  parameters  and  their  definition  is  given  in  Appendix  B.  Most  of  them  are 
nondimensior.ed  REAL  variables  which  have  preset  or  default  values.  There  are  also  dimensioned 
REAL  and  COMPLEX  arrays  used  for  loading  (l)  coefficient  and  root  data  into  polynomials  and 
transfer  functions  and  (2)  polynomial  elements  into  a  matrix  for  determinant  evaluation.  Descrip¬ 
tions  of  these  arrays  are  given  below. 

6.1.1  POLYP,  POLYN,  and  POLYD 

These  are  REAL  arrays  in  common  block  POLYCM  used  for  representing  polynomials  in  coefficient 
form.  Polynomial  data  is  stored  in  these  arrays  as  follows: 


element  (l)  = 
(2)  = 
(3)  = 


degree  of  the  polynomial 
coefficient  of  the  **0  term 
coefficient  of  the  **1  term 


(n+2)  =  coefficient  of  the  **  n-th  term 


(.LE.MXPDEG1) 


‘MXPl)EG=49  for  regular  version  of  LCAP2,  =100  for  large  model  version  on  the  CRAY 
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POLYP  is  used  for  loading  coefficient  data  into  POLY;  which  is  defined  in  Section  6.2.  POLYN 
and  POLYD  are  used  for  loading  numerator  and  denominator  coefficient  data  into  SPTF;,  ZPTFj, 
or  WPTFj  which  are  defined  in  Section  6.3. 


6.1.2  ROOTP,  ROOTN,  and  ROOTD 

These  are  COMPLEX  arrays  in  common  block  ROOTCM  used  for  representing  polynomials  in 
root  or  factored  form.  Root  data  is  stored  in  these  arrays  as  follows: 


element  (l)  =  CMPLX(deg,gain) 


(2)  =  root! 

(3)  =  root2 


where  deg = degree  of  the  polynomial 
and  deg.LE.MXPDEG 
gain=GAIN  defined  below 


(n+l)  =  rootn 


The  quantity  GAIN  is  defined  by  the  following  representation  of  a  polynomial: 


GAIN  ■  a* 


where  n  =  number  of  roots  at  the  origin. 


The  choice  of  the  factor  (^-  +  1)  as  opposed  to  (^  +  1)  allows  the  user  to  enter  roots  into  an 
array  using  their  actual  root  location.  If  the  +  1)  form  were  used  instead,  the  sign  of  each  root 
would  have  to  be  reversed  before  entering  it  into  the  array.  The  gain  as  defined  above  is  associated 
with  the  lowest  order  nonzero  coefficient  of  the  polynomial.  It  is  analogous  to  the  Bode  gain  of 
an  s  plane  transfer  function.  If  the  +  1)  term  were  defined  as  (s  +  a;)  instead,  the  definition 
of  GAIN  would  be  equal  to  the  highest  order  coefficient  of  the  polynomial.  In  this  case,  this  gain 
would  be  analogous  to  the  root  locus  gain  of  an  s  plane  transfer  function.  Although  the  format  used 
for  entering  root  data  into  ROOTP,  ROOTN,  and  ROOTD  does  not  allow  direct  entry  of  a  root 
locus  gain,  there  are  PRECMP  directives,  *ROOTP,  *ROOTN,  and  *ROOTD,  which  have  options 
for  entering  in  a  “root  locus”  gain  instead  of  a  “Bode”  gain.  When  this  option  is  selected,  these 
directives  will  convert  the  “root  locus  gain”  into  an  equivalent  “Bode”  gain  used  for  representing 
the  roots  in  the  format  defined  above. 


6.1.3  MO,  Ml,  M2,  M3,  and  M4 

These  are  REAL  arrays  in  common  block  MATRIX  1  which  are  used  for  representing  the  elements 
of  a  matrix  M(s)  whose  elements  are  polynomials.  The  M(s)  matrix  is  used  for  transfer  function 
evaluation  via  Cramer’s  method  in  which  the  determinant  of  a  polynomial  matrix  is  to  be  computed. 
Polynomial  data  in  coefficient  form  is  stored  in  these  MO,  Ml,  M2,  M3,  M4  matrices  as  follows: 
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MO(i,j)  =  coefficient  of  s°  term  in  element  (i,j) 

M 1  (i ,  j )  =  coefficient  of  s1  term  in  element  (i, j ) 

M4(i,j)  =  coefficient  of  s4  term  in  element  (i,j) 


6.1.4  BO,  Bl,  B2,  B3,  and  B4 

These  are  REAL  arrays  in  common  block  MATRIXl  which  are  used  for  representing  the  elements  of 
a  vector  B(s)  whose  elements  are  polynomials.  The  B(s)  vector  is  used  by  the  command  DTERM 
for  transfer  function  evaluation  via  Cramer’s  method  in  which  the  determinant  of  a  polynomial 
matrix  is  to  be  computed.  Polynomial  data  in  coefficient  form  is  stored  in  these  BO,  Bl,  B2,  B3, 
B4  vectors  as  follows: 

B0(i)  = 

Bl(i)  = 

B4(i)  = 


coefficient  of  s°  term  in  element  (i) 
coefficient  of  s1  term  in  element  (i) 

coefficient  of  s4  term  in  element  (i) 


6.2  LCAP2  Polynomials 


The  LCAP2  polynomial  data  structure  is  POLY;  which  is  defined  to  be  referenced  or  accessed 
by  the  user  with  an  index.  This  allows  the  user  to  perform  functional  operations  on  a  POLY; 
with  simple  FORTRAN  CALL  statements.  For  example,  to  add  POLY2  to  POLY3  and  store  the 
resultant  polynomial  into  POLYj,  the  following  FORTRAN  statement  can  be  used: 

CALL  P ADD (1,2 ,3) 

The  index  of  POLYi  can  be  any  nonnegative  integer  up  to  999.  By  definition  POLYo  is  defined 
to  be  a  zero  degree  polynomial  equal  to  one. 

The  most  common  way  for  the  user  to  input  data  into  a  POLY;  is  to  use  either  the  PLDC 
(polynomial  load  coefficient  form)  or  the  PLDR  (polynomial  load  root  form)  command.  An  example 
using  the  PLDC  command  was  given  already  in  Section  4.2  in  which  the  coefficient  data  is  first 
loaded  into  the  FORTRAN  array  POLYP  and  then  subroutine  PLDC  called.  If  the  root  or  factored 
form  of  the  polynomial  is  to  be  loaded  in,  root  information  is  first  loaded  into  the  FORTRAN  array 
ROOTP  and  then  subroutine  PLDR  called. 

Although  the  coefficient  and  the  root  or  factored  form  (with  the  appropriate  gain)  are  equivalent 
mathematically,  each  form  of  representation  has  its  advantages.  For  addition  or  subtraction,  the 
coefficient  form  is  required.  For  multiplication,  either  form  of  representation  can  be  used  although 
the  root  form  yields  the  more  accurate  results  since  the  product  can  be  obtained  by  collecting  the 
roots  of  the  multiplier  and  the  multiplicand.  An  internal  flag  is  defined  for  each  POLY;  which 
keeps  track  of  whether  the  root  form  representation  is  available.  All  POLYj’s  will  have  a  coefficient 
representation  by  definition.  If  roots  of  a  POLY;  were  loaded  in  or  were  computed  by  another 
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LCAP2  command,  the  root  flag  would  be  set  so  that  subsequent  operations  using  POLY;  can  make 
use  of  the  fact  that  its  roots  are  available. 


6.3  LCAP2  Transfer  Functions 


The  LCAP2  transfer  function  data  structures  are  SPTFj,  ZPTFj,  and  WPTF;  which  are  defined 
to  be  referenced  or  accessed  by  the  user  with  an  index.  This  allows  the  user  to  perform  functional 
operations  on  these  transfer  functions  with  simple  FORTRAN  CALL  statements.  For  example,  to 
multiply  SPTF4  by  SPTF5  and  store  the  resultant  product  into  SPTF2,  the  following  FORTRAN 
statement  can  be  used: 

CALL  SPHPY(2,4, 5) 

SPTF,,  ZPTFj,  and  WPTF;  are,  respectively,  s,  z,  and  w  plane  transfer  functions.  The  index  of 
these  transfer  functions  can  be  any  non  negative  integer  up  to  999.  By  definition  SPTF0,  ZPTF0, 
and  WPTF0  are  defined  to  be  the  unity  transfer  function. 

The  most  common  way  for  the  user  to  input  data  into  an  SPTFj  is  to  use  either  the  SPLDC 
(s  plane  load  coefficient  form)  or  the  SPLDR  (s  plane  load  root  form)  command.  For  example,  to 
load  the  following  transfer  function 


s  +  A 

s3  +  9s2  +  2  6s  +  24 

ir.+o  SPTF3,  the  following  FORTRAN  statements  can  be  used: 

P0LYU(1)  =  1  “degree  of  numerator” 

P0LYH(2)=A 

P0LYN(3)=1 

P0LYD(1)=3  “degree  of  denominator” 

P0LYD(2)=24 

P0LYD(3)=26 

P0LYD(4)=9 

P0LYD(5)=1 

CALL  SPLDC (3) 


If  PRECMP  directives  were  used  instead,  the  above  FORTRAN  statements  can  be  written  by 
PRECMP  if  the  user  uses  the  following  PRECMP  directives: 


♦POLYN  1  A  1 
♦POLYD  3  24  26  9  1 
♦SPLDC  3 


Another  example  is  to  load  the  following  transfer  function 
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_ 2Q(s  +  2) _ 

(a  +  3)(s  +  4)(^t  +  +  1) 

into  SPTF3.  First  rewrite  the  transfer  function  in  the  form 

_ 40(|  +  1) _ 

12(!  +  l)(*  +  l)(&  +  ^  +  l) 

The  following  FORTRAN  statements  will  load  in  data. 

R00TH(1)  =  (l.,40.)  “REAL(ROOTN(l))=number  of  numerator  roots” 

R00TN(2)  =  (-2..0.)  “IMAG(ROOTN(l))=numerator  gain” 

ROOTD(i)  =  (4.  ,12.)  “REAL(ROOTD(l))=number  of  denominator  roots” 

R00TD(2)  =  (-3..0.)  “IMAG(ROOTD(l))=:denominator  gain” 

R00TD(3)  =  (-4..0.) 

R00TD(4)  =  (-5.  ,-8.6602)  “roots  of  quadratics  must  be  computed  by  the  user” 
R00TDC6)  =  (-5., 8. 6602) 

CALL  SPLDR(3) 


If  PRECMP  directives  were  used  instead,  the  above  FORTRAN  statements  can  be  written  by 
PRECMP  if  the  user  uses  the  following  PRECMP  directives: 

*R00TN  40.  -2. 

*R00TD  12.  -3.  -4.  [.5,10.] 

♦SPLDR  3 


Note  that  when  the  *ROOTN  and  *ROOTD  PRECMP  directives  are  used,  the  number  of  roots 
do  not  have  to  be  entered.  It  will  be  computed  by  PRECMP.  In  the  *ROOTD  directive,  use  of  the 
[zeta, omega]  form  for  entering  roots  (see  Section  4.2.1)  will  automatically  convert  zeta  and  omega 
to  the  root  form  required  by  the  FORTRAN  array  ROOTD. 

Like  the  POLY,  data  type,  each  SPTF;,  ZPTFj,  and  WPTFj  has  an  internal  flag  associated 
with  it  to  keep  track  of  whether  the  root  form  representation  is  available.  When  adding  two 
transfer  functions  this  flag  will  be  checked  to  see  if  the  roots  are  available  for  both  operands.  If 
available,  LCAP2  will  first  factor  out  any  common  roots  from  the  denominators  before  adding  the 
two  operands  so  that  the  order  of  the  resultant  transfer  function  will  not  become  redundantly  large. 

6.4  Transfer  Function  Connection  Blocks 

For  automated  transfer  function  analysis  in  which  a  system  is  modeled  as  a  connection  of  transfer 
function  blocks,  three  different  types  of  connection  blocks  are  defined.  They  are  the  C;,  D;,  and 
Si  blocks  which  represent,  respectively,  connection  blocks  for  continuous,  discrete,  and  sample-hold 
blocks.  An  overview  on  how  these  blocks  are  used  was  given  in  Section  2.7.  In  the  next  chapter  a 
complete  description  on  how  they  are  used  will  be  presented. 
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Chapter  7 


Automated  Analysis  of  Systems 
Connected  by  Transfer  Function 
Blocks 

The  automated  method  for  analysis  of  systems  modeled  as  a  connection  of  transfer  functions  was 
implemented  to  (1)  simplify  the  effort  required  to  set  up  an  analysis,  (2)  provide  a  general  method 
for  handling  continuous-discrete  multirate  systems,  and  (3)  utilize  state  space  methods  for  im¬ 
proved  numerical  accuracy.  For  continuous  systems,  this  automated  method  provides  a  more  ef¬ 
ficient  method  of  analysis  for  complex  problems.  For  continuous-discrete  multirate  systems,  this 
automated  method  provides  more  than  an  efficient  method  of  analysis.  It  is  a  general  analysis 
procedure  which  can  model  any  continuous-discrete  multirate  system  represented  as  a  connection 
of  transfer  functions.  With  classical  discrete  transform  methods,  there  are  no  general  methods  for 
performing  an  analysis  based  on  block  diagram  reduction  methods.  Each  system  must  be  handled 
on  a  case-by-case  basis.  For  multirate  systems,  there  can  be  configurations  which  are  not  amenable 
to  analysis  by  the  classical  block  diagram  reduction  method.  Thus,  the  automated  analysis  method 
described  in  this  chapter  represents  not  only  a  more  efficient  method  for  analyzing  control  systems, 
it  provides  a  method  for  analyzing  continuous-discrete  multirate  systems  which  cannot  otherwise 
be  done  by  using  classical  methods1. 

The  following  is  a  summary  of  the  advantages  of  using  the  automated  analysis  method: 

•  Ease  of  setting  up  an  analysis. 

-  No  transfer  function  algebra  required. 

-  No  complex  node  equations  (or  signal  flow  graphs)  are  required  to  be  written  by  the 
user. 

-  No  conversion  of  s  plane  transfer  functions  to  Laplace  transformed  differential  equations 
required. 

-  User  specifies  only  the  inputs  to  each  transfer  function  connection  block. 

-  Program  will  automatically  (1)  connect  all  the  transfer  function  blocks,  (2)  remove  any 
nondynamic  states,  and  (3)  generate  a  state  space  representation. 

1  At  the  present  time  the  automated  method  does  not  handle  time  delays.  The  classical  transform  method,  however, 
can  handle  time  delays  of  continuous  dynamics. 


T  -  1 


—  For  SISO  transfer  function  evaluation  and  frequency  or  time  response  calculation,  the 
user  only  has  to  define  the  input  and  output  blocks. 

-  For  root  locus,  the  gain  to  be  varied  does  not  have  to  be  a  loop  gain.  The  gain  of  any 
continuous  or  discrete  connection  block  can  be  varied. 

•  General  analysis  method  for  multirate  systems  connected  by  transfer  functions. 

-  Analyzes  configurations  which  are  not  possible  with  classical  discrete  transform  methods 

•  Improved  computational  results. 

-  Uses  QR  and  QZ  methods  for  computing  eigenvalues  and  generalized  eigenvalues,  re¬ 
spectively. 

-  Uses  Kalman-Bertram  method  for  analysis  of  continuous- discrete  multirate  systems. 

Before  describing  the  automated  analysis  method,  the  user  code  for  specifying  the  connection  of  the 
transfer  functions  will  be  presented.  Familiarity  with  the  mechanics  of  setting  up  the  connection 
of  the  transfer  function  blocks  will  provide  a  better  understanding  of  the  operations  involved  in 
computing  the  state  space  representation  of  a  system. 


7.1  Input  Code  Required  for  Connecting  Transfer  Function  Blocks 

The  first  part  of  an  automated  transfer  function  analysis  is  the  input  code  required  for  specifying 
the  connection  of  the  transfer  function  blocks  and  the  loading  or  computing  of  transfer  function 
data.  This  section  will  discuss  only  the  input  code  for  specifying  the  connection  of  the  transfer 
functions.  This  is  a  separate  procedure  from  the  loading  or  computing  of  transfer  function  data1. 
For  continuous  systems,  SPTF;  blocks  are  to  be  connected.  For  continuous-discrete  multirate 
systems,  SPTF;,  ZPTF;,  and  sample-hold  blocks  are  to  be  connected.  WPTF;  blocks  are  not 
used  since  discrete  systems  in  the  Kalman-Bertram  method  are  represented  as  difference  equations. 
For  flexibility  in  defining  and  in  modifying  the  connection  of  transfer  function  blocks,  a  set  of 
continuous,  discrete,  and  sample-hold  connection  blocks,  C;,  D;,  and  S; ,2  respectively,  are  defined. 
Connection  of  a  system  is  to  be  described  in  terms  of  these  Cj,  D;,  and  Sj  blocks  instead  of  the 
SPTFj  and  ZPTF;  transfer  functions  which  contains  the  actual  data.  To  specify  the  connection 
of  transfer  functions  of  a  system,  the  following  is  required  of  the  user: 

•  Assign  a  transfer  function  connection  block  to  each  transfer  function. 

•  Enter  the  number  of  connection  blocks. 

•  Enter  a  descriptive  label  for  each  connection  block. 

•  Enter  an  SPTF  or  ZPTF  identifier  number  (a  pointer)  for  each  continuous  or  discrete  con¬ 
nection  block. 

•  Enter  the  number  of  inputs  to  each  connection  block. 

•  Enter  the  inputs  connected  to  each  connection  block. 

'This  procedure  can  be  done  before  or  after  the  loading  or  computing  of  transfer  function  data 
1  Sample-hold  connection  blocks  are  sero-order  hold  blocks 
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•  For  each  discrete  or  sample-hold  connection  block,  enter  the  sampling  period. 

The  procedure  for  specifying  the  connection  of  transfer  functions  will  be  explained  in  the  following 
subsections  by  the  use  of  examples.  The  same  two  examples  from  the  overview  in  Chapter  2  for 
a  continuous  system  and  a  continuous-discrete  multirate  system  will  be  used.  The  commands 
associated  with  the  automated  transfer  function  analysis  procedure  will  have  the  prefix  Bl  or  B2. 
Bl  will  be  used  for  continuous  systems  and  B2  will  be  used  for  continuous-discrete  systems. 

7.1.1  Continuous  System 

The  code  to  specify  the  connection  of  the  following  continuous  system  in  Figure  7.1  will  be  presented. 


SPTFq  SPTF7  SPTFa 


outer  loop 


Figure  7.1:  Continuous  System  Example 


For  batch  LCAP2,  three  subroutines  are  used  to  specify  the  connection  of  a  continuous  system. 
They  are  (1)  BlINIT  for  initialization,  (2)  BlCEQ  for  block  equation  definition,  and  (II)  Bl  END  for 
terminating  the  connection  procedure.  The  procedure  for  specifying  the  connection  always  begins 
with  a  call  to  BlINIT  and  ends  with  a  call  to  BlEND.  From  the  Reference  in  Appendix  A  for 
BlINIT,  the  call  to  BlINIT  is  described  as: 


FORTRAN  CALL 


CALL  BlINIT(  tlabel,  oldnew,  ncblk  ) 


where,  tlabel  =  label  for  block  1  connection  (.LE.60  characters) 
oldnew  =  ’OLD’  for  old  data,  (no  initialization) 

=  ’NEW’  for  new  data,  (initializes  all  connections) 
ncblk  =  number  of  s  plane  blocks 


Each  C;  block  requires  a  separate  call  to  BlCEQ.  The  call  to  BlCEQ  is  described  as: 
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FORTRAN  CALL 


CALL  BlCEQ(  label,  indx,  isptf,  iyin,  nycin,  iycin  ) 


where,  label  =  label  for  block  C;  (.LE.60  characters) 

indx  =  block  identifier  for  block  Cj  (l  -  ncblk) 
isptf  =  SPTF  identifier  for  block  C,  (0-999) 
iyin  =  for  future  use.  Enter  a  dummy  value. 

nycin  =  number  of  continuous  blocks  connected  as  inputs  to  block  C; 
iycin  =  array  containing  the  identifiers  of  the  continuous  blocks  connected 
to  C;  (negative  for  sign  change) 

The  FORTRAN  code  for  this  example  can  be  written  as: 


NCBLK=S 

CALL  B1INITC ’FIGURE  7.1  CONNECTION  FILE’ , 'HEW’ .NCBLK) 

IYCIN(l)=-2 

IYCIN(2)=-3 

INDX=1 

ISPTF=0 

IYIN=0 

NYCIN=2 

CALL  BlCEq( ’SUMMING  BLOCK  USED  TO  DEFINE  -(C2  +  C3) ’ 

+ , INDX . ISPTF . IYIN . NYCIN , IYCIN) 

IYCIN(1)=4 

CALL  BlCEQ (’ INNER  LOOP  COMPENSATION’ ,2 .6,0, 1 , IYCIN) 
IYCIN(1)=5 

CALL  BlCEQ (’ OUTER  LOOP  COMPENSATION’ ,3, 20, 0,1, IYCIN) 
IYCIN(1)=1 

CALL  BlCEQ (’FORWARD  LOOP  COMPENSATION ’ ,2 ,7 ,0 , 1 , IYCIN) 
IYCIN(1)=4 

CALL  B1CEQ ( ’PLANT ’ , 5, 1 , 0 , 1 , IYCIN) 

CALL  BIEND 


Subroutine  BlINIT  will  initialize  the  procedure  for  specifying  the  connection  of  the  C;  blocks.  In 
the  first  call  to  BlCEQ,  use  of  assignment  statements  for  arguments  indx,  isptf,  and  nycin  were 
made  for  clarity.  The  actual  inputs  to  Cj  are  specified  by  the  values  in  IYCIN(l)  and  IYCIN(2) 
which,  in  this  example,  are  both  negative  since  there  is  negative  feedback.  Note  that  the  input  u  is 
not  included  in  the  procedure  for  connecting  the  transfer  functions.  An  input  is  only  needed  when 
a  transfer  function  is  evaluated.  In  the  last  four  calls  to  BlCEQ,  the  arguments  indx,  isptf,  and 
nycin  were  passed  by  value  (instead  of  by  name)  to  save  a  few  lines  of  code.  The  BlEND  subroutine 
terminates  the  connection  procedure.  It  will  produce  warning  messages  if  incorrect  data  is  entered 
or  if  a  C|  block  was  not  specified. 

The  above  FORTRAN  code  can  be  equivalently  written  by  the  following  PRECMP  directives: 

♦BlINIT  ’FIGURE  7.1  CONNECTION  FILE’  ’NEW’  5 
♦IYCIN  -2  -3 

♦BlCEQ  ’SUMMING  BLOCK  USED  TO  DEFINE  -(C2  +  C3) ’  1002 
♦IYCIN  4 
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♦B1CEQ  ’INNER  LOOP  COMPENSATION’  2601 
♦IYCIN  5 

♦B1CEQ  ’OUTER  LOOP  COMPENSATION’  3  20  0  1 
♦IYCIN  1 

♦B1CEQ  ’FORWARD  LOOP  COMPENSATION’  2701 
♦IYCIN  4 

♦B1CEQ  ’PLANT’  5101 
♦BIEND 

After  the  BlEND  subroutine  is  called,  the  following  will  be  printed  out  to  summarize  the  connection 
of  the  transfer  functions. 

NUMBER  OF  CONTINUOUS  BLOCKS  =  5 
BLOCK  DESCRIPTION 

Cl  SUMMING  BLOCK  USED  TO  DEFINE  -(C2  +  C3) 

C2  INNER  LOOP  COMPENSATOR 

C3  OUTER  LOOP  COMPENSATOR 

C4  FORWARD  LOOP  COMPENSATOR 

C5  PLANT 

BLOCK  TRANSFER  FUNCTION  INPUTS  FROM  BLOCK 


Cl 

SPTFO 

-C2 

C2 

SPTF6 

C4 

C3 

SPTF20 

C5 

C4 

SPTF7 

Cl 

C5 

SPTF1 

C4 

The  format  of  this  printout  enables  the  connections  to  be  easily  verified.  A  command  BISAVE  is 
available  which  will  save  the  connection  data  for  a  continuous  system.  For  details  and  an  example  on 
its  use,  see  the  Reference  in  Appendix  A  and  also  Example  17  in  Chapter  9.  The  transfer  function 
connection  data  only  describe  the  connection  of  the  C;  blocks.  They  are  totally  independent  of 
SPTFj  data  except  for  the  pointer  or  SPTF  identifier  number  associated  with  each  C;  block.  This 
separation  between  connection  of  Q  data  and  SPTF;  data  allows  the  user  to  model  and  analyze 
a  system  more  efficiently.  Revisions  to  an  existing  model  can  be  made  by  substituting  different 
SPTF  identifiers  for  the  appropriate  C;  blocks. 

In  this  example  all  the  loops  were  closed.  If  an  open  forward  loop  transfer  function  were  to  be 
computed,  the  input  to  the  C2  block  would  be  set  to  zero  and  the  transfer  function  between  the 
input  to  C2  and  the  output  of  Ci  would  be  computed.  Without  this  automated  transfer  function 
connection  capability,  the  effort  to  change  a  closed  loop  configuration  to  an  open  loop  configuration 
can  be  significant  if  the  system  is  complex. 

The  use  of  the  unity1  summing  Ci  block  in  this  example  was  made  so  that  an  open  loop  transfer 
function  can  be  computed.  The  command  BlTF  for  transfer  function  evaluation  requires  that  the 
desired  output  be  an  output  of  a  Cj  block.  It  cannot  be  a  function  of  several  Cj  blocks.  Thus, 
summing  C;  blocks  must  be  defined  by  the  user  for  any  variable  of  interest  which  is  not  an  output 
of  a  SPTFj  block  with  dynamic  states. 

'By  definition  SPTFo  is  equal  to  1. 
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7.1.2  Continuous-Discrete  Multirate  Systems 


The  code  to  specify  the  connection  of  the  following  continous- discrete  multirate  system  in  Figure 
7.2  will  be  presented. 


Figure  7.2:  Continuous-Discrete  Multirate  System  Example 

For  batch  LCAP2,  five  subroutines  are  used  to  specify  the  connection  of  a  continuous-discrete 
multirate  system.  They  are  (1)  B2INIT  for  initialization,  (2)  B2CEQ  for  continuous  block  equation 
definition,  (3)  B2DEQ  for  discrete  block  equation  definition,  (4)  B2SEQ  for  sample-hold  equation 
definition,  and  (5)  B2END  for  terminating  the  connection  procedure.  The  procedure  for  specifying 
the  connection  always  begins  with  a  call  to  B2INIT  and  ends  with  a  call  to  B2END.  From  the 
Reference  in  Appendix  A  for  B2INIT,  the  call  to  B2INIT  is  described  as: 

FORTRAN  CALL  |  CALL  B2INIT(  tlabel,  oldnew,  ncblk,  ndblk,  nshblk  )  ~ 

where,  tlabel  =  label  for  block  2  connection  (.LE.60  characters) 
oldnew  =  ’OLD’  for  old  data,  (no  initialization) 

=  ’NEW’  for  new  data,  (initializes  all  connections) 
ncblk  =  number  of  s  plane  blocks 
ndblk  =  number  of  z  plane  blocks 
nshblk  =  number  of  sample  hold  blocks 
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Each  C;  block  requires  a  separate  call  to  B2CEQ.  The  call  to  B2CEQ  is  described  as: 
FORTRAN  CALL  CALL  B2CEQ(  label,  indx,  isptf,  delay,  iyin,  nycin,  nxsin,  iycin,  ixsin  ) 

where,  label  —  label  for  block  C;  (.LE.60  characters) 

indx  =  block  identifier  for  block  C;  (1  -  ncblk) 
isptf  =  SPTF  identifier  for  block  Cj 

delay  =  delay  of  block  Cj,  not  implemented  yet,  but  must  enter  a 
dummy  value 

iyin  =  for  future  use.  Enter  a  dummy  value. 

nycin  =  number  of  continuous  blocks  connected  as  inputs  to  block  C; 
nxsin  =  number  of  sample- hold  blocks  connected  as  inputs  to  block  Cj 
iycin  =  array  containing  the  identifiers  of  the  continuous  blocks  connected 
to  C;.  (negative  for  sign  change) 

ixsin  =  array  containing  the  identifiers  of  the  sample-hold  blocks  connected 
to  C;.  (negative  for  sign  change) 

Each  D;  block  requires  a  separate  call  to  B2DEQ.  The  call  to  B2DEQ  is  described  as: 

FORTRAN  CALL  CALL  B2DEQ(  label,  indx,  izptf,  dsampt,  delay,  iyin,  nycin,  nydin 

+, nxsin,  iycin,  iydin,  ixsin  ) 

where,  label  =  label  for  block  Dj  (.LE.60  characters) 

indx  =  block  identifier  for  block  D;  (1  -  ndblk) 
izptf  =  ZPTF  identifier  for  block  D; 
dsampt  =  sampling  period  of  block  D; 

delay  =  delay  of  block  Dj,  not  implemented  yet,  but  must  enter  a 
dummy  value 

iyin  =  for  future  use.  Enter  a  dummy  value. 

nycin  =  number  of  continuous  blocks  connected  as  inputs  to  block  D; 

nydin  =  number  of  discrete  blocks  connected  as  inputs  to  block  D; 
nxsin  =  number  of  sample-hold  blocks  connected  as  inputs  to  block  Dj 
iycin  =  array  containing  the  identifiers  of  the  continuous  blocks 
connected  to  Dj.  (negative  for  sign  change) 
iydin  =  array  containing  the  identifiers  of  the  discrete  blocks  connected 
to  Dj.  (negative  for  sign  change) 
ixsin  =  array  containing  the  identifiers  of  the  sample-hold  blocks 
connected  to  D;.  (negative  for  sign  change) 

Each  Sj  block  requires  a  separate  call  to  B2SEQ.  The  call  to  B2SEQ  is  described  as: 

FORTRAN  CALL  CALL  B2SEQ(  label,  indx,  ssampt,  delay,  nydin,  nxsin,  iydin,  ixsin  ) 
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where,  label  =  label  for  block  S;  (.LE.60  characters) 

indx  =  block  identifier  for  block  S;  (1  -  nshblk) 
ssampt  =  sampling  period  of  block  S; 

delay  =  delay  of  block  S; ,  not  implemented  yet,  but  must  enter  a 
dummy  value 

nydin  =  number  of  discrete  blocks  connected  as  inputs  to  block  S; 

(See  the  Reference  in  Appendix  A  for  constraint  on  sampling 
period  of  discrete  block) 

nxsin  =  number  of  sample-hold  blocks  connected  as  inputs  to  block  S; 
iydin  =  array  containing  the  identifiers  of  the  discrete  blocks  connected 
to  S;.  (negative  for  sign  change) 
ixsin  =  array  containing  the  identifiers  of  the  sample-hold  blocks 
connected  to  Sj.  (negative  for  sign  change) 

The  FORTRAN  code  for  the  example  in  Figure  7.2  can  be  written  as: 


NCBLK=2 

NDBLK=7 

NSHBLK=1 

CALL  B2INIT( 'LABEL  FOR  EXAMPLE  2  CONNECTION  FILE' , 'NEW' .NCBLK 
+ , NDBLK , NSHBLK) 

IXSIN(l)=l 
IHDX=1 
ISPTF=1 
DELAY=0 . 

HYCIN=0 

NXSIN=1 

CALL  B2CEQ ( ' G1  BLOCK ’ , IHDX , ISPTF , DELAY , 0 , NYCIH , HXSIN , IYCIN , IXSIN) 
CALL  B2CEQ ( ' G2  BLOCK' ,2,2,0. .0,0, 1 .IYCIN, IXSIN) 

INDX=1 

IZPTF=3 

Tl= . 02 

DSAMPT=T1 

NYCIN=0 

NYDIN=0 

NXSIN=0 

CALL  B2DEQ ( ' G3  BLOCK ’ , INDX , IZPTF , DSAMPT , DELAY , 0 , NYCIN , NYDIN , NXSIN 
+. IYCIN. IYDIN, IXSIN) 

IYDIN(1)=4 

CALL  B2DEQOG4  BLOCK ’  ,2 ,4,T1 , DELAY ,0 , 0 , 1 , 0, IYCIN , IYDIN , IXSIN) 
IYDIN(1)=5 

CALL  B2DEQ( 'G5  BLOCK'  ,3, S,T1, DELAY, 0,0, 1,0, IYCIN, IYDIN, IXSIN) 

T2= . 005 
IYCIN(1)=1 

CALL  B2DEQ('G6  BLOCK' ,4,6, T2, DELAY, 0,1, 0,0, IYCIN, IYDIN, IXSIN) 
IYCIN(1)=2 

CALL  B2DEQ( ’G7  BLOCK' ,5,7, T2, DELAY, 0,1, 0,0, IYCIN, IYDIN, IXSIN) 
IYDIN(1)=-1 


7-8 


IYDIN(2)=2 

IYDIN(3)=-3 

CALL  B2DEQ ( ’ SUMMING  BLOCK ’ . 6 , 0 , T1 , DELAY , 0 , 0 , 3 , 0 , IYCIN , IYDIN , IXSIN) 
IYCIN(1)=1 

CALL  B2DEQ( ’SAMPLED  OUTPUT  OF  G1 7 , 0 ,T1 , DELAY, 0 , 1 , 1 , 0 , IYCIN, IYDIN, IXSIN) 

IYDIN(1)=6 

INDX=1 

SSAMPT=T1 

NYDIN=1 

NXSIN=0 

CALL  B2SEQC ’ZOH  BLOCK’ , INDX, SSAMPT, DELAY, NYDIN, NXSIN, IYDIN, IXSIN) 

CALL  B2END 


Subroutine  B2INIT  will  initialize  the  procedure  for  specifying  the  connection  of  the  Cj,  D;,  and  S; 
blocks.  In  the  first  calls  to  B2CEQ,  B2DEQ,  and  B2SEQ,  assignment  statements  for  some  of  the 
arguments  were  used  for  clarity.  In  the  remaining  calls  to  these  subroutines,  most  of  the  arguments 
were  passed  by  value  (instead  of  by  name)  to  save  a  few  lines  of  code.  The  B2END  subroutine 
terminates  the  connection  procedure.  It  wili  produce  warning  messages  if  incorrect  data  is  entered 
or  if  a  connection  block  was  not  specfied. 

The  above  FORTRAN  code  can  be  equivalently  written  by  the  following  PRECMP  directives: 


NCBLK=2 

NDBLK=7 

NSHBLK=1 

♦B2INIT  ’LABEL  FOR  EXAMPLE  2  CONNECTION  FILE’  ’NEW’  NCBLK  NDBLK  NSHBLK 
♦IXSIN  1 

INDX=1 
ISPTF=1 
DELAY=0 . 

NYCIN=0 

NXSIN=1 

♦B2CEQ  ’ G1  BLOCK’  INDX  ISPTF  DELAY  0  NYCIN  NXSIN 
♦B2CEQ  ’ G2  BLOCK’  2  2  DELAY  001 
INDX=1 
IZPTF=3 
Tl= . 02 


DSAMPT=T1 

NYCIN=0 

NYDIN=0 

NXSIN=0 

*B2DEq  ’ G3  BLOCK'  INDX  IZPTF  DSAMPT  DELAY  0  NYCIN  NYDIN  NXSIN 
♦IYDIN  4 

♦B2DEQ  ’ G4  BLOCK’  2  4  T1  DELAY  0010 
♦IYDIN  5 

♦B2DEQ  ’ G5  BLOCK’  3  3  5  T1  DELAY  0010 
T2= . 005 


♦IYCIN  1 
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♦B2DEQ  *G6  BLOCK*  4  6  T2  DELAY  0100 
*IYCIN  2 

*B2DEQ  *G7  BLOCK*  5  7  T2  DELAY  0100 
*IYDIN  -12-3 

*B2DEQ  ’SUMMING  BLOCK’  6  0  T1  DELAY  0300 
♦IYCIN  1 

♦B2DEQ  ’SAMPLED  OUTPUT  OF  Cl’  7  0  T1  DELAY  0100 
♦IYDIN  6 

INDX=1 

SSAMPT=T1 

NYDIN=1 

NXSIN=0 

*B2SEQ  ’ZOH  BLOCK’  INDX  SSi.MPT  DELAY  NYDIN  NXSIN 
CALL  B2END 


After  the  B2END  subroutine  is  called,  the  following  will  be  printed  out  to  summarize  the  connection 
of  the  transfer  functions. 


NUMBER  OF  CONTINUOUS  BLOCKS  =  2 
BLOCK  DESCRIPTION 

Cl  G1  BLOCK 

C2  G2  BLOCK 


BLOCK 

TRANSFER  FUNCTION 

INPUTS 

FROM  BLOCK 

Cl 

SPTF1 

SI 

C2 

SPTF2 

SI 

NUMBER 

OF  DISCRETE  BLOCKS  = 

7 

BLOCK 

DESCRIPTION 

D1 

G3  BLOCK 

D2 

G4  BLOCK 

D3 

G5  BLOCK 

D4 

G6  BLOCK 

D5 

G7  BLOCK 

D6 

SUMMING  BLOCK 

D7 

SAMPLED  OUTPUT  OF 

Cl 

BLOCK 

TRANSFER  FUNCTION 

SAMPLING  PERIOD 

INPUTS  FROM  : 

D1 

ZPTF3 

. 20000E-01 

HAS  NO  INPUT 

D2 

ZPTF4 

.  20000E-01 

D4 

D3 

ZPTFS 

.  20000E-01 

DS 

D4 

ZPTF6 

. 50000E-02 

Cl 

D5 

ZPTF7 

.  50000E-02 

C2 

D6 

ZPTFO 

. 20000E-01 

-D1  ,  D2  , -D3 

D7 

ZPTFO 

. 20000E-01 

Cl 
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NUMBER  OF  SAMPLE-HOLD  BLOCKS  =  1 
BLOCK  DESCRIPTION 

SI  ZOH  BLOCK 

BLOCK  SAMPLING  PERIOD  INPUTS  FROM  BLOCKS 

SI  . 20000E-01  D6 

The  format  of  this  printout  enables  the  connections  to  be  easily  verified.  A  command  B2SAVE 
is  available  which  will  save  the  connection  data  for  a  continuous-discrete  system.  For  details  and 
an  example  on  its  use,  see  the  Reference  in  Appendix  A  and  also  Example  18  in  Chapter  9.  The 
transfer  function  connection  data  only  describe  the  connection  of  the  Q,  D;,  and  Si  blocks.  They 
are  totally  independent  of  SPTF;  and  ZPTFj  data  except  for  the  SPTF  or  ZPTF  identifier  number 
associated  with  each  Cj  or  D;  block.  This  separation  between  connection  of  C;  and  Di  data  and 
SPTFj  and  ZPTF;  data  allows  the  user  to  model  and  analyze  a  system  more  efficiently.  Revisions 
to  an  existing  model  can  be  made  by  substituting  different  SPTF  or  ZPTF  identifiers  for  the 
appropriate  Ci  or  Di  blocks. 

In  this  example  all  the  loops  were  closed.  If  an  open  loop  transfer  function  at  point  Pj  in  Figure 
7.2  is  to  be  determined,  the  connection  from  D2  to  Dg  must  be  broken  and  the  transfer  function 
between  Dg  and  Dj  calculated.  Without  this  automated  transfer  function  connection  capability,  the 
effort  to  change  from  a  closed  loop  configuration  to  an  open  loop  configuration  would  be  significant. 

The  use  of  the  unity1  summing  Dg  block  in  this  example  was  made  so  that  an  open  loop  transfer 
f  nction  can  be  computed.  The  command  B2TF  for  transfer  function  evaluation  requires  that  the 
desired  output  be  an  output  of  a  D;  block.  It  cannot  be  a  function  of  several  D;  blocks.  Thus, 
summing  D;  blocks  must  be  defined  by  the  user  for  any  variable  of  interest  which  is  not  an  output 
of  a  ZPTF;  block  with  dynamic  states. 

The  unity  D7  block  in  this  example  was  used  so  that  the  closed  loop  transfer  function  between 
R  and  the  output  of  block  “Gj”  at  the  slower  sampling  rate  can  be  computed  with  the  command 
B2TF. 

The  complete  statement  and  solution  of  this  benchmark  problem  using  the  transfer  function  con¬ 
nection  method  is  presented  in  Example  18  in  Chapter  9. 


‘ZPTFo  i“  equal  to  the  unity  transfer  function  by  definition 
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7.2  Derivation  of  State  Space  Description  of  Systems  Connected 
by  Transfer  Function  Blocks 


The  state  space  description  of  systems  represented  by  a  connection  of  transfer  functions  is  solved  for 
by  using  data  from  (1)  the  transfer  function  connection  data  specified  by  the  procedure  described 
in  Section  7.1  and  (2)  SPTF;  and  ZPTF;  data.  To  compute  the  state  space  representation  of 
a  system,  the  transfer  function  associated  with  each  connection  block  is  first  transformed  into  a 
subsystem  in  state  space  form.  Then  using  the  connection  data,  the  subsystems  are  combined 
to  form  a  single  state  space  representation.  The  derivation  to  be  presented  is  for  a  single  input 
since  only  SISO  transfer  functions  are  computed  by  LCAP2.  Continuous  and  continuous-discrete 
multirate  systems  are  presented  separately. 


7.2.1  Continuous  Systems 

Each  transfer  function  associated  with  a  C;  connection  block  is  converted  to  the  state  space  form 

xcj  —  Actxct-  T  BC{UC 

Vci  —  Cc^Xcj  4  ID ci^c  (7.l) 

The  number  of  states  in  the  vector  xcj  is  determined  by  the  order  of  the  s  plane  transfer  function 
associated1  with  block  C;.  The  output  of  block  C;  is  the  scalar  yci.  The  input  uc  represents  all 
the  inputs  into  block  Cj.  These  inputs  can  only  be  outputs  from  other  C;  blocks2  and  the  single 
input  u  to  the  system.  Note  that  when  the  transfer  function  associated  with  block  Ci  is  a  scalar, 
the  matrices  Acj,  B ci,  and  C „  will  be  zero. 

The  state  space  representation  for  all  the  C;  blocks  can  be  combined  and  expressed  as 

xc  =  Acxc  4-  Bcu  4-  Ecyc 

ye  =  Ccxc  +  Dcu  +  Fcyc  (7.2) 


where 


ncblk  = 
me  < 


x 


C 


number  of  C;  blocks 

ncblk  (<  ncblk  if  there  is  a  C,  block  with  no  dynamics) 
xci 

Xc2 


yc 


X 


c  me 


yc\ 

Vc2 

Vc  ncblk 


blockdiag  AC] ,  AC2,  •  •  ■ ,  ACmc 


‘Determined  by  the  block  identifier  for  Ci. 

JThey  are  specified  by  the  array  1YC1N  described  in  Section  7.1 
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Bc 

Cc 

Dc 


Bci 

Bc2 


L  Bcmc  J 

blockdiag  ^Ccl)  Cc 2i  •  •  •  >  Ccncblk 

Del 

dc2 


L  Dc  ncblk  J 


Beiec(l,l)  Beiec(l,2)  •••  Bclec(l,nc6/fc) 
Bc2ec(2, 1)  Bc2€e(2, 2) 


Bcmc^c(^)  l)  Bcmcec(mci  Ttcblk)  J 

where  ec(i,j)  is  equal  to  1  if  block  Cj  is  an  input  to  block  Cj;  otherwise  it  is  equal  to  zero. 


Del/C(l,l)  Del/C(l,2)  Dei/c(l,  ncblk) 

bc2/c(2,l)  Dc2/e(  2,2) 

.  ^>cncblkfc{ncblk,l)  t>c  nMk  fc(ncblk,  ncblk)  _ 


where  fc{i,j)  is  equal  to  1  if  block  Cj  is  an  input  to  block  C;;  otherwise  it  is  equal  to  zero. 
Solving  for  the  vector  yc,  the  system  can  be  written  as 

xc  =  Acxc  +  Bcu 

yc  =  Ccxc  +  Dcu  (7.3) 

where 

Cc  =  [I-Fel^Ce 
Dc  =  (I-Fej-'De 
Ac  =  Ac  +  EcCc 
Bc  =  Bc  4-  EcDc 


Five  LCAP2  commands  are  available  for  analysis  based  upon  this  state  space  representation.  They 
are: 

•  BlEIG  -  Eigenvalues  of  the  system  matrix 

•  BlLOCI  -  Loci  of  the  eigenvalues  as  a  function  of  gain  applied  to  any  C;  block 

•  BlTF  -  SISO  transfer  function  evaluation  in  rational  form  between  any  two  C;  blocks 
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•  BlFREQ  -  SISO  frequency  response  between  any  two  C;  blocks  (without  solving  for  the  poles 
and  zeros  of  the  transfer  function) 

•  BlTIME  -  SISO  time  response  (by  state  space  method)  between  any  two  C;  blocks 

Although  a  frequency  response  can  be  computed  by  first  evaluating  a  transfer  function  in  rational 
form  using  the  command  BlTF  and  then  using  the  frequency  response  command  SFREQ,  the 
command  BlFREQ  is  implemented  as  an  alternate  method  for  computing  the  frequency  response 
for  the  following  reasons: 

•  If  the  poles  and  zeros  cannot  be  computed  accurately  by  command  BlTF,  any  subsequent 
frequency  response  calculations  using  the  command  SFREQ  on  a  transfer  function  evaluated 
with  command  BlTF  will  be  limited  to  the  accuracy  of  the  poles  and  zeros.  Although  the 
limited  experience  in  using  the  BlTF  command  on  test  and  benchmark  cases  so  far  has  not 
given  any  indications  that  the  accuracy  of  the  poles  and  zeros  are  in  question,  this  concern 
must  be  addressed  since  this  is  a  difficult  numerical  problem  to  solve  in  a  reliable  and  accurate 
manner.  This  is  particularly  true  for  the  zeros  which  are  solved  for  by  the  QZ  method. 

•  The  frequency  responses  computed  by  command  BlFREQ  uses  Laub’s  state  space  method 
[8]  which  does  not  involve  the  computation  of  the  zeros  and  poles  of  the  transfer  function. 
This  method  should  be  able  to  compute  the  frequency  response  of  systems  represented  in 
state  space  form  which  cannot  be  reliably  and  accurately  computed  by  the  combination  of 
commands  BlTF  and  SFREQ. 

The  command  BlFREQ  was  implemented  primarily  as  a  means  to  enable  the  user  to  (l)  check 
the  accuracy  of  the  rational  transfer  function  computed  by  command  BlTF1  and  (2)  compute  a 
frequency  response  should  the  BlTF  command  yield  inaccurate  results. 

The  two  methods  used  by  commands  BlTF  and  BlFREQ  for  computing  a  transfer  function  are 
to  be  presented  next.  For  command  BlTF,  the  transfer  function  from  block  C;  to  block  Cj  for  an 
input  u  into  block  C;  is  given  by 


yj(s) 

u(s) 


det 


det 


si  A  B 

row  j  of  -C  row  j  of  D 


si  -  A 


(7.4) 


where  u  is  applied  to  block  C;.  Equation  (7.4)  is  used  for  implementing  the  command  BlTF  since 
it  can  be  used  to  compute  the  roots  of  the  transfer  function  directly2.  At  the  present  time  the  QZ 
and  QR  methods  are  used  to  solve  for  the  poles  and  zeros,  respectively.  The  QZ  method,  though, 
is  not  always  reliable  and  is  sensitive  to  both  (1)  the  order  of  the  SPTFi  blocks  associated  with 
the  C;  connection  block  and  (2)  the  method  used  to  convert  from  transfer  function  to  state  space 
representation.  At  the  present  time  the  observer  canonical  form  is  used  to  compute  the  state  space 
representation.  Future  efforts  to  improve  the  reliability  and  accuracy  of  the  BlTF  command  will 
include: 

lBy  comparing  frequency  responses  computed  by  the  command  BlFREQ  and  by  the  combination  of  commands 
BlTF  and  SFREQ. 

1  An  alternate  method  is  to  first  compute  the  coefficients  of  the  determinants  and  then  find  the  roots  of  the 
resultant  polynomials.  This  is  an  inherently  less  accurate  method  for  computing  the  roots. 
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•  Evaluate  both  the  resultant  numerator  and  denominator  polynomials  at  two  different  fre¬ 
quencies  and  compare  the  results  with  the  evaluation  of  the  two  determinants  in  (7.4). 

•  Allow  the  user  to  select  a  root  finding  method1  for  solving  the  numerator  and  denominator 
roots  instead  of  using  the  QR  and  QZ  methods  even  though  this  method,  in  general,  is  less 
accurate. 

•  Use  a  partial  fraction  method  for  converting  from  transfer  function  to  state  space  represen¬ 
tation. 


For  command  BlFREQ,  the  transfer  function  from  block  C;  to  block  Cj  is  given  by  j-th  row  of 


Y(s) 

u(s) 


C[  si  -  A  l^B  +  D 


(7.5) 


Although  a  time  response  can  be  computed  by  first  evaluating  a  transfer  function  in  rational  form 
using  the  command  BlTF  and  then  using  the  time  response  command  STIME  (which  is  based 
on  an  inverse  Laplace  transform  method),  the  command  BlTIME  is  implemented  as  an  alternate 
method  for  computing  the  time  response  for  the  following  reasons: 

•  The  accuracy  of  the  computed  time  response  by  command  STIME  depends  on  the  accurate 
knowledge  of  the  poles  and  zeros  of  a  transfer  function.  As  discussed  previously,  the  poles 
and  zeros  computed  by  command  BlTF  may  not  always  be  solved  in  a  reliable  and  accurate 
manner. 

«  The  time  response  implemented  by  command  BlTIME  does  not  use  the  inverse  Laplace 
transform  method.  It  uses  the  solution  of  (7.3)  evaluated  at  every  T  seconds  given  by 


<y> 

x(kT  +  T )  =  eATx(kT)  +  [  eArdrBu(kT) 

Jo 

y(kT )  =  Cx(kT)  +  Du(kT)  (7.G) 

The  command  BlTIME  computes  the  time  response  from  block  Cj  to  block  Cj  where  j  is  the  j-th 
row  of  the  output  vector  y(kT)  in  (7.6). 

The  use  of  nondynamic  C;  blocks  in  specifying  the  connection  of  transfer  function  blocks  enables 
the  user  to  model  any  variable  of  interest.  Consideration,  though,  must  be  made  on  how  these 
nondynamic  or  algebraic  states  will  affect  the  subsequent  computation  of  eigenvalues  and  transfer 
functions.  In  some  control  analysis  programs2  which  have  a  similar  block  diagram  connection 
capability  to  LCAP2,  use  of  nondynamic  gain  blocks  will,  in  general,  increase  the  dimension  of 
the  system  matrix.  This  of  course  will  result  in  a  nonminimal  state  space  realization.  For  transfer 
function  evaluation,  this  means  that  the  added  dimension  of  the  system  matrix  will  yield  some 
redundant  common  poles  and  zeros.  This  higher  dimensionality  of  the  system  matrix  will  require 

‘The  same  one  used  by  commands  DTERM  and  DETRM. 

*PC-MATLAB  and  CTRL-C 
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more  execution  time  for  computing  eigenvalues  and  transfer  functions  as  well  as  the  possibility  of 
less  accurate  results. 

In  the  formulation  of  the  state  space  representation  used  by  LCAP21,  nondynamic  Cj  blocks  will 
not  affect  the  dimension  of  the  system  matrix.  They  only  add  to  the  the  row  dimension  of  matrices 
C  and  D.  Thus,  in  the  evaluation  of  a  SISO  transfer  function  using  (7.4),  nondynamic  C;  blocks 
will  not  introduce  unnecessary  and  redundant  common  roots  in  the  numerator  and  denominator2. 
In  practice  an  analyst  will  naturally  want  to  model  a  system  in  terms  of  physical  variables.  This 
typically  will  require  the  use  of  many  nondynamic  C;  blocks.  For  example,  in  the  IFjF.E  Simple 
Continuous  Model  benchmark  in  Example  17  in  Chapter  9,  12  out  of  the  21  Cj  blocks  are  non¬ 
dynamic  blocks.  If  a  state  space  formulation  in  which  the  dimension  of  the  system  matrix  was 
increased  by  one  for  each  nondynamic  Cj  block  were  used  instead  of  (7.2),  the  dimension  of  the 
system  matrix  would  have  been  increased  from  14  (the  actual  number  of  dynamic  states)  to  26. 

7.2.2  Continuous-Discrete  Multirate  Systems 

There  are  two  parts  to  computing  the  state  space  representation  of  a  continuous-discrete  system 
modeled  as  a  connection  of  transfer  functions.  The  first  is  computing  the  state  space  representations 
for  (1)  the  continuous  and  discrete  dynamics  using  the  connection  data  and  the  SPTFj  and  ZPTF; 
data  and  (2)  the  sample-hold  states.  The  formulation  will  yield  representations  in  which  the 
elements  of  the  output  vectors  yc  and  yj  correspond  to  the  outputs  of  the  C;  and  Dj  blocks, 
respectively.  The  sample-hold  states  are  functions  of  the  vector  yj. 

For  the  continuous  part  of  the  system,  each  transfer  function  associated  with  a  C;  connection  block 
is  converted  to  the  state  space  form 

xct  —  F  BciUc 

Vci  =  CcjXc{  F  Dc,iic  (7.7) 

The  number  of  states  in  the  vector  xcj  is  determined  by  the  order  of  the  s  plane  transfer  function 
associated3  with  block  Cj.  The  output  of  block  C;  is  the  scalar  yci.  The  input  uc  represents  all  the 
inputs  into  block  Cj.  These  inputs  can  only  be  outputs  from  other  Cj  blocks4  and  Sj  blocks5.  No 
inputs  from  a  D;  block  are  allowed.  Also  no  input  uc  is  allowed  since  transfer  functions  will  only 
be  defined  between  D;  blocks.  Note  that  when  the  transfer  function  associated  with  block  Cj  is  a 
scalar,  the  matrices  Acj,  Bcj,  and  C„  will  be  zero. 

The  state  space  representation  for  all  the  Cj  blocks  can  be  combined  and  expressed  as 

x„  •-  Acxc  +  Bcx,  F  E„yc 

yc  =  Crxc  F  Dcx,  F  Fryc  (7.8) 

where 

nshblk  =  number  of  S;  blocks 

‘t>,.  (7.2) 

This  does  not  imply  that  the  transfer  function  is  a  minimal  realization.  There  may  be  common  poles  and  zeros 
that  are  a  function  only  of  the  dynamics  blocks  that  are  connected. 

3  Determined  by  the  block  identifier  for  C,. 

3  They  are  specified  by  the  array  IYCIN  described  in  Section  7.1. 

*They  are  specified  by  the  array  1XS1N  described  in  Section  7.1. 
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X»2 

x‘  =  : 

nahblk 

and  ncblk ,  me,  xc,  yc,  Ac ,  Bc,  Cc,  De,  Ec,  and  Fc  are  defined  in  (7.2). 

Solving  for  the  vector  yc,  the  system  can  be  written  as 

xc  =  Aexc  +  Bcx, 

yc  =  Ccxc  +  Dcx,  (7.9) 

where 

Cc  =  (I  -  Fc]-1  Cc 
Dc  =  (I  -  F c]_1  De 
Ac  =  Ac  +  EcCc 
Bc  —  B  c  +  ECDC 


The  discussion  in  Section  7.2.1  on  how  nondynamic  C;  blocks  will  net  affect  the  dimension  of  the 
system  matrix  applies  to  (7.9)  as  well. 

For  the  discrete  part  of  the  system,  each  transfer  function  associated  with  a  Dj  connection  block 
is  transformed  to  the  state  space  form 

^dt (  )  —  A diXdi(tfc)  T  BdlUd(tk) 

Vdi(tk)  =  Cdlxdl(tk)  +  t>d,ud(tk)  (7.10) 

The  number  of  states  in  the  vector  xdi  is  determined  by  the  order  of  the  z  plane  transfer  function 
associated1  with  block  Dj.  The  output  of  block  Dj  is  the  scalar  ydi.  The  input  ud  represents  all  the 
inputs  into  block  Dj.  These  inputs  can  only  be  outputs  from  (1)  C;  blocks2,  (2)  Dj  blocks3,  (3)  S; 
blocks4  and  (4)  the  single  input  ud  to  the  system.  Note  that  when  the  transfer  function  associated 
with  block  D;  is  a  scalar,  the  matrices  A^i,  Bji,  and  Cdi  will  be  zero. 

The  state  space  representation  for  all  the  D;  blocks  can  be  combined  and  expressed  as 

x-d(tk+ i)  =  Adxd{th)  +  Bdud(tk)  +  1^(4)  +  Gdxs(tk)  +  Bdyd(tk) 

y  d(tk)  -  cdxd(tk)  +  Ddud(tk)  +  Fdyc(tk)  +  Hdxt(tk)  +  Qdyd(tk)  (7.11) 

where 

ndblk  =  number  of  Dj  blocks 
'Determined  by  the  block  identifier  for  Di. 

’They  are  specified  by  the  array  IYCIN  described  in  Section  7.1. 

’They  are  specified  by  the  array  IYDIN  described  in  Section  7.1. 

4 They  are  specified  by  the  array  IXSIN  described  in  Section  7.1.  The  output  of  each  sample-hold  block  is  x„. 
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nshblk 

md 

y-d 


—  number  of  S;  blocks 

<  ndblk  (<  ndblk  if  there  is  a  D;  block  with  no  dynamics) 

Xrfl 

X<f2 


X</  rnd 

ydi 

y  d2 


y  d  = 


X,  = 


yd  ndblk 

X,1 

X.2 

X,  nshblk 


A d  =  blockdiag  [Adl,  Ad2,---,  Admd] 


Bd  = 


Cd  = 


D  d  = 


Bdl 

Bd2 


rnd  J 

blockdiag  ^C^i,  Cj2i  •  •  •  > 

Ddl 
Dd2 


D 


d  ndblk 


Ed  = 


Bd2erf(2, 1)  Bd2erf(2,2) 

L  Bdmded{md,l) 


Bd\ed(l,  ncblk) 


Bdmded{md,ncblk) 


where  ed{i,j)  is  equal  to  1  if  block  Cj  is  an  input  to  block  Dj,  otherwise  it  is  equal  to  zero. 


D  difd(l,l) 
T>d2fd(2,l) 

l  t>dndbtkfd(^dblk,  1) 


Ddi/rf(l,2) 

Ddifd(2,2) 


B(/i  fd(  1)  ncblk) 


t>d ndblk  fd(ndblk,  ncblk)  J 


where  fd(i,j)  is  equal  to  1  if  block  Cj  is  an  input  to  block  D;,  otherwise  it  is  equal  to  zero. 
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Bji  gd(l,nshblk) 


Gd 


Bd20<i(2,l)  Bd20d(2,2) 

.  Bd  md9d{  mdy  1 ) 


B dmdgd(md,nshblk)  _ 


where  gd(i,j )  is  equal  to  1  if  block  Sj  is  an  input  to  block  D;,  otherwise  it  is  equal  to  zero. 

t>dihd(L,nshblk) 


Hd 


Bdihd(l,  1) 

D<kM2,1) 


DiiMl-2) 

Bd2hd(2,2) 


L  ndblk  ^d( Tldblk^  Tishbllc ) 

where  hd(i,j )  is  equal  to  1  if  block  Sj  is  an  input  to  block  D;,  otherwise  it  is  equal  to  zero. 


B<fiP<f(l,  1)  BdiPd(l,2)  •••  Bdlpd(l,  ndblk) 
Bd2pd(2, 1 )  Bd2pd(2,  2) 

Bdmdpd(md,  1)  Bdrndpd(md,  ndblk) 


where  pd(i,j)  is  equal  to  1  if  block  Dj  is  an  input  to  block  Dj,  otherwise  it  is  equal  to  zero. 

Ddiqd{l, ndblk) 


Qd  = 


Bdlgd(l,l)  Ddlqd(l,2) 

Dd2gd(2,l)  Dd2qd(2,2) 

L  Ddnd/>n.qd(ndblk,  1) 


Ddndbikqd(ndblk,  ndblk)  J 


where  qd(i,  j)  is  equal  to  1  if  block  Dj  is  an  input  to  block  Dj,  otherwise  it  is  equal  to  zero. 
Solving  for  the  vector  yd,  the  system  can  be  written  as 


where 


Xd(4+i)  =  Adxd(tk)  +  BdUd(tfc)  +  Edxc(tk)  +  Gdx,(lk) 
y  d(tk)  =  c  dxd{tk)  +  D  dUd{tk)  +  F  dxe(tk)  +  Hrfx,(tfc) 


Cd  =  [I  -  Q]-1  Cd 
Dd  =  [I  -  Q]_1  Dd 
Fd  =  [I  -  Q]-1  FdCc 
Hd  =  [I  -  Q]"1  {FdDc  +  Hd} 
A  d  =  Ad  +  PdCd 
Bd  =  Bd  +  PdDd 
Ed  =  EdCc  +  PdFd 
Gd  =  EdDc  +  Gd  +  PdHd 


(7.12) 


7-19 


Like  the  continuous  case,  the  nondynamic  D;  blocks  will  not  affect  the  dimension  of  the  system 
matrix  in  (7.12). 

For  the  sample-hold  part  of  the  system,  the  vector  x,,  whose  elements  represents  the  output  of  the 
Sj  blocks,  will  have  the  following  form, 

x,(tfc+i)  =  B  ,cxc(tk)  +  B  ,dXd{tk)  +  B„x,(4)  +  B  ,uud(tk)  (7.13) 

Note  that  no  input  u,  to  a  Sj  block  is  defined  and  that  uj  is  a  scalar  connected  to  a  discrete 
block.  Only  a  single  uj  input  is  allowed  since  transfer  functions  will  only  be  defined  between  two 
D;  blocks.  Note  also  that  BJC  is  the  contribution  from  the  continuous  dynamics  even  though  Cj 
blocks  are  not  connected  to  Sj  blocks.  This  contribution  occurs  when  a  D;  block  provides  a  direct 
connection  between  a  C;  and  S;  block,  i.e.,  when  the  z  plane  transfer  function  associated  with  D; 
has  equal  number  (including  none)  of  poles  and  zeros  . 

Before  defining  the  matrices  B,c,  B B„,  and  B#ti,  constraints  on  the  inputs  to  block  Sj  are 
presented.  At  the  present  time,  the  implementation  of  LCAP2  only  allows  one  input  for  each  S; 
block,  either  from  a  discrete  block  Dj  with  the  same  sampling  period  as  block  Sj  or  from  another 
sample-hold  block  Sj  with  a  different  sampling  period  than  block  S;.  In  modeling  a  connection 
between  discrete  block  Dj  and  sample-hold  block  S;  which  have  different  sampling  periods,  (l) 
define  a  new  sample-hold  block  S /  with  a  sampling  period  equal  to  discrete  block  Dj  and  (2)  insert 
block  S/  between  Dj  and  Sj.  Matrices  B,c,  B,j,  B„,  and  Bau  are  then  defined  as  follows: 

•  If  block  Sj  is  not  sampled  at  t/c+ 1,  all  elements  of  row  i  of  B,c,  B,d,  B„,  and  B,u  are  zero 
except  for  column  i  of  B„  which  is  equal  to  one.  This  nonzero  element  allows  the  i-th  state 
of  x5  to  be  propagated  unchanged  between  and  tfc+i. 

•  If  block  S;  is  sampled  at  £*.+,  and  the  input  to  block  S;  is  from  discrete  block  Dj  which  has 
the  same  sampling  period  as  Sj,  the  i-th  row  of  B,c,  B a(j,  B„,  and  B,u  will  be  equal  to  the 
the  j- tli  row  of  Fj,  C <*,  Hj,  Dj,  respectively. 

•  If  block  S;  is  sampled  at  </e+i  and  the  input  to  block  S;  is  from  block  S /,  all  elements  of  row 
i  of  B,c,  B„d,  B„,  and  Bau  are  zero  except  for  column  l  of  B„  which  is  equal  to  one. 

The  second  part  to  computing  the  state  space  representation  for  a  continuous-discrete  system  is 
the  use  of  the  Kalman- Bertram  method  to  compute  the  state  transition  matrix  from  t=0  to  t  =  T, 
where  T  is  the  LCM  sampling  period  of  the  Dj  and  S;  blocks.  From  this  state  transition  matrix, 
eigenvalues,  transfer  function,  root  locus,  frequency  response,  and  time  response  can  be  computed. 

The  following  discussion  outlines  the  steps  used  in  implementing  the  Kalman-Bertram  method  of 
analysis.  For  details  on  this  method,  see  Ref.  3. 

Step  1  From  all  the  Dj  and  S;  connection  blocks,  compute  the  LCM  sampling  period  and  set  up 
discrete  time  segment  tables.  The  discrete  time  segments  correspond  to  the  times  at  which  any  Dj 
or  S;  block  is  to  be  sampled.  All  samplers  are  assumed  to  be  synchronized  at  time  zero.  This  set 
of  discrete  times  is  described  by  the  following  sequence, 

to,  tj,  t2, .  ■ . ,  t„ 


where,  £n  =  0  and  tn  =  T. 
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Step  2  The  state  vector  is  written  as 


(7.14) 

Step  3  The  solution  of  the  continuous  equations  between  discrete  sampling  times  4  and  4+i  is 
given  by 

xc(4  +  r)  =  $r(r)xc(4)  +  f  $c(r)Bcdr  x,(4)  (7.15) 

Jo 

or  in  state  space  form  as 

xc(4  +  r)  1  $c(r)  0  JJ  $c(r)Bcdr  xc(4) 

Xd(<*+r)  =  0  1  0  xd(tk)  (7.16) 

x,(4  +  r)  0  0  /  _  xa(4)  _ 

where,  r  <  (r*+i  -  r*)  and  <I>c(t)  =  eA‘T. 

The  state  transition  matrix  propagating  the  continuous  dynamics  from  4  to  4+ 1  is  given  by 
xc(4+i)  $C(T)  0  /0T  $c(r)BcdT  xc(4) 

xd(4+i)  -  0  /  0  xd(4)  (7.17) 

x,(4+i)  °  0  7  J  [  x,(4) 

where  r  =  4+j  -  4.  This  can  then  be  rewritten  as 

x(4+i)  =  ^+ix(4)  (7.18) 

where  the  continuous  transition  matrix,  is  defined  as 

*«=(r)  0  So  *c{t)B cdr 

*k+i  =  0  7  0  (7.19) 

0  0  7  I T  =  4+1  -  4 

Step  4  The  state  transition  matrix  for  the  discrete  equations  is  given  by 
xc(4+1)  7  0  0  xr(4)  0 

xd(4+i)  =  Ed  Ad  G  j  xd(4)  +  Bd  ud(tk)  (7.20) 

_  x,(4+i)  0  0  7  x,(4)  0 

which  can  be  rewritten  as 

0 

x(4+i)  =  Dfc+1x(4)  +  Bd  ud(4)  (7.21) 

0 

where  D),.,.!1  ,  the  discrete  transition  matrix,  is  given  by 

'7  0  o' 

Dje+i  =  Erf  Arf  Grf  (7.22) 

0  0  7 

‘The  bold  face  D*  has  two  different  meanings  in  this  report  (the  other  is  the  k-th  discrete  connection  block).  The 
context  in  which  it  is  used  will  not  present  any  ambiguity. 
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Step  5  The  state  transition  matrix  for  the  sample-hold  equations  is  given  by 


xc(4+i) 

xj(4+i) 

= 

_  x,(4+1) 

which  can  be  rewritten  as 


7  0  0 

0  7  0 

BJC  BJ(j  B„ 


x(4+i)  =  Sfc+1x(4)  + 


xc(4) 

0 

x<i(4) 

+ 

0 

. 

_  x*(4)  _ 

BJU 

\  o  I 

B. 


Ud{tk) 


Ud{tlc) 


(7.23) 


(7.24) 


where  S^+i 1  ,  the  sample-hold  transition  matrix,  is  given  by 


Sfc+i 


7  0  0 

0  7  0 

BJ(;  B  ,d  Bai 


(7.25) 


Step  6  Compute  the  state  transition  matrix  of  the  system  from  t=0  to  t  =  T.  This  is  obtained  by 
computing  the  state  transition  matrix  at  each  discrete  time  and  then  propagating  the  results  from 
t=0  to  t  =  T. 


First  consider  the  case  with  input  uj  =  0.  For  the  k-th  discrete  time,  the  state  transition  matrix 
from  4  and  4+1  is  given  by  the  following  sequence, 

x(tfc+)  =  S  fc+ix(4)  (7.26) 

x(V+)  =  D*+lx(tfc+)  =  D*+1S*+1x(4)  (7.27) 

x(4+i)  =  *fc+1x(ffe++)  =  $fc+1Dfe+1Sfe+1x(4)  (7.28) 

where,  tk+  is  defined  to  be  slightly  larger  than  4  and  tk++  is  defined  to  be  slightly  larger  than  tk+ . 
Defining  "14  as 


the  state  transition  matrix  from  4  to  4+1  can  be  written  as 


x(4+i)  =  ’ffc+ix(4) 


(7.29) 


(7.30) 


Thus,  the  state  transition  matrix  between  to  and  tn  is  given  by 

x(4)  =  ^n«,n-l..-'p2^lX(to)  (7.31) 

Defining  'k  as 

*  =  2*1  (7.32) 

Eq.  (7.30)  can  be  rewritten  as 

x(tn)  =  *x(t0)  (7.33) 

‘The  bold  face  has  two  different  meanings  in  this  report  (the  other  is  the  k-th  sample-hold  connection  block). 
The  context  in  which  it  is  used  will  not  present  any  ambiguity. 
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which  after  transforming  to  the  z  plane,  yields 


(2I  -  'P)x(z)  =  0 


(7.34) 


If is  the  state  transition  matrix  for  a  closed  loop  system,  its  eigenvalues  are  the  closed  loop  poles. 
This  operation  can  be  implemented  bv  the  command  B2EIG.  Command  B2LOCI  will  compute  the 
loci  of  eigenvalues  as  a  function  of  gain  applied  to  any  C;  or  Dj  block.  These  two  commands  are 
described  in  the  Reference  in  Appendix  A. 

Now  the  case  where  the  input  Ud  is  not  zero  will  be  considered.  Since  a  tiansfer  function  between 
two  Di  blocks  are  to  be  computed  at  the  LCM  sampling  period,  the  input  Ud  is  only  applied  at  t 
=  0.  T,  2T,  3T,  . . . 

The  state  transition  matrix  between  t0  and  ij  is  computed  by  the  following  sequence 


x(t0+)  =  S1x(t0)  + 

x(*0++)  =  Dix(<0+)  + 


0 

0 

B,u 

0 

B  d 

0 


Ud(t 0) 

Ud{to) 


f 

0 

0 

D1 

0 

+ 

Bd 

l 

B„u 

0 

> 

>  M*o) 


x(«l)  =  <hx(t0++) 


f 

0 

0 

1 

SxB^x^q)  +  < 

1  1 

0 

+ 

Bd 

[ 

b5u 

0 

Ud(to) 


Defining  Bj  as 


f 

0 

0 

] 

Bi  =  $1  7  Dj 

0 

+ 

Bd 

l 

BJU 

0 

I.q.  (7.37)  can  be  simplified  as 

x(tj )  =  ^ix(to)  +  B,urf(<o) 

Since  ud  will  be  zero  until  tn,  the  transition  matrix  from  t0  to  tn  is 

X(tn)  =  ■  •  •  *2*lX(l0)  +  •  •  •  ♦zBmrfOo) 

Using  (7.31)  and  defining  B  as 


(7.35) 


(7.36) 


(7.37) 


(7.38) 


(7.39) 


(7.40) 


B  -  'Pn^n_]  •  •  •  'k2Bi  (7.41) 

Liq.  (7.40)  can  be  rewritten  as 

M[n)  -  *x(t0)  f  Bvd(l0)  (7.42) 
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The  state  space  representation  of  the  discrete  system  at  the  LCM  sampling  rate,  T,  is  thus 


x{kT  +  T)  = 

Ax(JfcT)  +  B  ud{kT) 

where 

y  d(kT)  = 

Cx(kT)  +  Dud(kT) 

A  = 

* 

C  = 

[Fa  Cd  H,,] 

D  = 

Drf 

There  are  two  different  methods  for  evaluating  a  SISO  transfer  function  from  (7.4.1).  The  first 
method,  which  is  implemented  by  command  B2TF,  computes  the  poles  and  zeros  of  the  z  plane 
transfer  function  from  block  D;  to  Dj  using  the  following  equation 


y  4j(z) 

u(z) 


det 


det 


zl  -  A  B 

row  j  of  -C  row  j  of  D 


zl  -  A 


(7.44) 


Like  the  command  BlTF,  the  QZ  method,  which  is  used  to  compute  the  zeros,  is  sensitive  to  both 
(1)  the  order  of  the  SPTF;  and  ZPTF;  blocks  associated  with  the  C;  and  Dj  blocks,  respectively 
and  (2)  the  method  used  to  convert  from  transfer  function  to  state  space  representation.  Future 
effort  to  address  this  problem  was  given  in  Section  7.2.1.  This  sensitivity  of  the  QZ  method  will 
be  more  pronounced  for  discrete  systems  since  the  roots  are  in  the  z  plane. 

The  second  method  for  evaluating  an  SISO  transfer  function  from  (7.43)  is  implemented  by  the 
command  B2FREQ  which  uses  Laub’s  state  space  method.  The  transfer  from  block  Cj  to  block 
Cj  is  give^  by  the  j-th  row  of 


Y(z) 

u(z) 


C[  zl  -  A  ]~1B  +  D 


(7.45) 


The  comments  on  the  command  BlFREQ  g  ven  in  Section  7.2.1  apply  to  command  B2FREQ  as 
well.  Since  computation  of  poles  and  zeros  of  transfer  function  is  a  difficult  numerical  problem, 
particularly  in  the  z  plane,  Oie  analyst  is  encouraged  to  use  the  command  B2FREQ  to  check  the 
results  of  command  B2TF  if  there  are  any  doubts  on  the  accuracy  of  the  computed  poles  and  zeros. 

For  small  order  problems,  a  time  response  can  be  computed  by  first  evaluating  a  transfer  function 
in  rational  form  by  using  the  command  B2TF  and  then  using  command  ZTIME  which  will  compute 
the  time  response  by  recursive  evaluation  of  a  difference  equation.  For  higher  order  systems,  this 
method  will  not  work  since  the  z  plane  coefficients  cannot  be  accurately  represented  with  enough 
precision  by  the  computer. 

Command  B2TIME  computes  the  the  SISO  time  response  from  block  D;  to  block  Dj  by  using  the 
solution  of  (7.43)  which  is 
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x(i feT  +  T)  =  Ax(ifcT)  +  Bu(kT) 
row  j  of  [y (kT)  =  Cx(kT)  +  Du(fcT)j 


(7.46) 


7.3  LCAP2  Commands  for  Automated  Analysis 

After  a  continuous  or  a  continuous-discrete  multirate  system  is  modeled  as  a  connection  of  transfer 
function  blocks,  the  following  types  of  commands  are  available  for  automated  analysis: 

•  Eigenvalue 

•  Transfer  function  evaluation 

•  Root  locus 

•  Frequency  response  calculation  using  Laub’s  method 

•  Time  response  using  state  space  method 

Before  any  of  the  these  commands  can  be  used,  (l)  a  system  must  be  properly  connected  as 
described  in  Section  7.1  and  (2)  have  all  the  transfer  functions  that  are  to  be  connected  stored  in 
the  appropriate  SPTF;  and  ZPTF;  transfer  functions.  Connection  of  transfer  function  blocks  can 
be  done  before  or  after  SPTF;  and  ZPTF;  data  is  loaded  or  computed. 

Along  with  the  above  commands,  there  are  commands  for  saving  and  loading  transfer  function 
connection  data.  The  use  of  all  the  above  types  of  commands  will  be  demonstrated  in  the  next  two 
subsections  for  the  examples  in  Figures  7.1  and  7.2. 

7.3.1  Continuous  Systems 

Continuing  the  example  in  Section  7.1.1,  code  will  be  presented  to  demonstrate  the  commands 
that  are  available  for  automated  analysis  of  continuous  systems  modeled  as  a  connection  of  transfer 
functions. 

The  following  sequence  of  operations  is  to  be  performed: 

•  Compute  closed  loop  poles  using  the  BlEIG  eigenvalue  command. 

•  Compute  closed  loop  transfer  function  between  the  input  u  and  the  output  of  C3. 

•  Evaluate  closed  loop  frequency  response  between  the  input  u  and  the  output  of  C3  using 
Laub’s  method. 

•  Evaluate  time  response  between  input  u  and  the  output  of  C3  using  state  space  method. 

•  Evaluate  time  response  between  input  u  and  the  output  of  C3  using  inverse  Laplace  transform 
method. 

•  Save  connection  data  of  closed  loop  configuration. 
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•  Compute  open  loop  transfer  function  of  the  inner  loop. 

•  Compute  root  locus  by  varying  the  forward  loop  gain. 

The  FORTRAN  code  to  implement  these  operations  can  be  written  as: 


C 


C 


C 


C 


C 


C 

C 


CALL  BIEIG(S) 


“eigenvalues  stored  in  POLY5” 


UCIN=1 
UMAGN=1 . 
YC0UT=3 
CALL  B1TF(8) 


“input  u  connected  to  Ci” 

“magnitude  of  input” 

“output  of  transfer  function  is  C3” 

“computed  transfer  function  stored  in  SPTF8” 


N0MEGA=2 

0HEGA(i)=l 

OMEGA(2)=10 

UC  111=1 

YC0UT=3 

CALL  BlFREQ (  ) 

TDELT= . 1 
TEND=5. 

CALL  B1TIHE  () 

TZERQ=0 . 

CALL  STIHE(8) 

CALL  B1SAVE( ’CLSLPl ’ ) 


“number  of  frequencies  in  array  OMEGA” 

“see  Reference  on  BlFREQ” 

“see  Reference  on  BlFREQ” 

“input  u  connected  to  Ci” 

“output  of  transfer  function  is  C3” 

“evaluate  frequency  response  without  computing 
the  poles  and  zeros” 

“delta  time  for  time  response” 

“end  time  for  time  response” 

“time  response  by  state  space  method” 

“start  time  for  time  response  (required  by  STIME)” 
“time  respones  by  inverse  Laplace  transform  method” 
“save  connection  data  to  file  CLSLPl” 


CALL  B1INIT(  ’  OPEN  INNER  LOOP  CONFIG. 'OLD ’ ,5)  “initialize  with  old  data” 
IYCIN(l)=-5  “connect  only  outer  loop” 

CALL  B1CEQ( ’SUHMER  BLOCK 1 ,0 , 1 , IYCIN) 

CALL  BIEND  “inner  loop  is  now  opened” 


UCIN=2 
YC0UT=1 
CALL  B1TFC9) 


“input  u  connected  to  C2” 

“output  of  transfer  function  is  Cj” 

“computed  transfer  function  stored  in  SPTFg” 


CALL  B1L0AD(  'CLSLPl  ’  )  “reload  closed  loop  configuration” 


NL0CI=2 

KGAIN(1)=2 

KGAIN(2) =20 

KFLG=0 

KDELT=2 

CALL  B1L0CI(2) 


“number  of  root  locus  gains  in  arrav  ’  A” 
“see  Reference  on  BlLOCI” 

“see  Reference  on  BlLOCI” 

“see  Reference  on  BlLOCI” 

“see  Reference  on  BlLOCI” 

“vary  gain  of  C2  block” 


Fora  detail  description  of  the  BlEIG,  BlTF,  BlFREQ,  BlTIME,  BlLOCI,  BlSAVE,  and  BlLOAD 
commands,  see  the  Reference  in  Appendix  A. 
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7.3.2  Continuous-Discrete  Multirate  Systems 


Continuing  the  example  in  Section  7.1.2,  code  will  be  presented  to  demonstrate  the  commands 
that  are  available  for  automated  analysis  of  continuous  systems  modeled  as  a  connection  of  transfer 
functions. 

The  following  sequence  of  operations  is  to  be  performed: 


•  Compute  closed  loop  poles  using  the  B2EIG  eigenvalue  command. 

•  Compute  closed  loop  transfer  function  between  the  input  R  and  the  output  of  D7. 

•  Evaluate  closed  loop  frequency  response  using  Laub’s  method. 

•  Evaluate  closed  loop  time  response  using  state  space  method. 

•  Save  connection  data  of  closed  loop  configuration. 

•  Open  inner  loop  at  point  Pj  and  compute  open  loop  transfer  function  between  input  to  block 
D6  and  the  output  of  block  D2. 

•  Reload  connection  data  for  closed  loop  configuration 

•  Compute  root  locus  by  varying  the  forward  loop  gain. 

The  FORTRAN  code  to  implement  these  operations  can  be  written  as: 


C 


C 


C 


C 


CALL  B2EIGC6) 


“eigenvalues  stored  in  POLY6” 


UD  111=1 
UMAGN=1 . 
YDQUT=7 
CALL  B2TFC8) 


“input  u  connected  to  D;” 

“magnitude  of  input” 

“output  of  transfer  function  is  D7” 

“computed  transfer  function  stored  in  ZPTFg” 


N0MEGA=2 

0MEGA(1)=1 

OMEGA(2)=10 

UDIN=1 

YD0UT=7 

CALL  B2FREQC  ) 

SAMPT= . 02 
TEND=4. 

CALL  B2TIME(  ) 

CALL  B2SAVE( ’CLSLP2  ’  ) 


“number  of  frequencies  in  array  OMEGA” 

“see  Reference  on  B2FREQ” 

“see  Reference  on  B2FREQ” 

“input  u  connected  to  Di” 

“output  of  transfer  function  is  D7” 

“evaluate  frequency  response  without  computing 
the  poles  and  zeros” 

“sampling  period  for  evaluating  time  response” 
“end  time  for  time  response” 

“evaluate  time  response  using  state  space  method” 
“save  connection  data  to  file  CLSLP2” 


CALL  B2  IN  IT  (’OPEN  INNER  LOOP  CONFIG OLD  ’  ,5)  “initialize  with  old  data” 
IYCIN(1)  =  -1  “connection  for  block  Dj” 

IYCIN(2)  =  -3  “connection  for  outer  loop: 

CALL  B2DEQ( ’SUMMER  BLOCK ’ , 6 . 0 ,T1 , 2 , IYDIN) 
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c 


CALL  B2EBD 


“inner  loop  is  now  opened” 


UDIH=6 
YD0UT=2 
CALL  B2TF(9) 

C 

CALL  B2L0AD ( * CLSLP2 ’ ) 
C 

NL0CI=2 

KGAIH(1)=2 

KGAIff(2)=20 

KFLG=0 

KDELT=2 

CALL  B2L0CI(’D,,2) 


“input  u  connected  to  Dg” 

“output  of  transfer  function  is  D2” 

“computed  transfer  function  stored  in  ZPTFg 

“reload  closed  loop  configuration” 

“number  of  root  locus  gains  in  array  KGAIN” 
“see  Reference  on  BlLOCI” 

“see  Reference  BlLOCI” 

“see  Reference  on  BlLOCI” 

“see  Reference  on  BlLOCI” 

“vary  gain  of  D2  block” 


Note  that  the  closed  loop  frequency  response  could  also  be  computed  by  the  command  ZFREQ 
after  the  closed  loop  transfer  function  was  computed  and  stored  in  ZPTFs-  For  a  detail  description 
of  the  B2EIG,  B2TF,  B2FREQ,  B2TIME,  B2LOCI,  B2SAVE,  and  B2LOAD  commands,  see  the 
Reference  in  Appendix  A. 


Chapter  8 


Basic  Examples 


A  selection  of  basic  LCAP2  commands  are  presented  in  this  chapter.  Examples  1  through  12  were 
prepared  to  be  be  executed  sequentially  in  one  batch  job.  Example  12  demonstrates  the  use  of  the 
SAVE  command  used  to  save  transfer  function,  polynomial,  and  matrix  data  for  a  restart  capability. 
Example  13  demonstrates  the  LOAD  command  used  to  restore  the  data  saved  in  Example  12. 

Each  example  begins  with  a  statement  of  the  problem  and  is  followed  by  two  types  of  user  input 
code,  one  being  all  FORTRAN  code1  and  the  other  a  combination  of  FORTRAN  and  PRECMP 
code2  which  requires  fewer  input  statements.  After  the  input  code,  the  printer  output  is  given. 

Examples  1  through  12  can  be  reproduced  by  the  users  by  executing  anv  of  the  following  files  which 
are  saved  as  indirect  files  on  CDC  MFB.  A  copy  of  an  indirect  file  can  be  obtained  by  typing  the 
following  command  in  INTERCOM: 

IGET.f  ile_naine/PF=ZL2USER,  ID=9487 
where  file  .name  and  its  description  is  given  below  in  Table  8.1. 


Table  8.1:  Decks  for  Creation  of  Examples  1-12 


Files  For  Reproducing  Chapter  8  Examples 

file  .name 

Description 

CBUSER 

For  CRAY  Without  PRECMP 

CPBUSER 

For  CRAY  With  PRECMP 

BBUSER 

For  CDC  MFB  Without  PRECMP 

BPBUSER 

For  CDC  MFB  With  PRECMP 

XBUSER 

For  CDC  MFX  Without  PRECMP 

XPBUSER 

For  CDC  MFX  With  PRFCMP 

To  exerute  a  CRAY  job,  type: 

CSUBMIT, file mame. 


'Created  by  files  CBUSER,  BBUSER,  or  XBUSER  in  Table  8.1. 

2 Created  by  files  CPBUSER,  BPBUSFR,  or  XPBUSER  in  Table  8.1 


8  -  1 


To  execute  a  CDC  job,  type: 

BATCH .file  _name , INPUT . 

In  Examples  1,5, 6, 7, 9,  and  10,  which  produce  both  low  and  high  resolution  plots,  only  the  printer 
plots  are  shown.  The  high  resolution  hardcopy  plot  files  generated  by  these  examples  are  processed 
by  the  HARDCPY  program  after  the  LCAP2  program  has  been  executed.  The  hardcopy  plots 
from  these  examples  are  presented  in  Appendix  H. 


8.1  Example  1  -  S  Plane  Frequency  Response 


Problem:  Compute  frequency  response  of 


s2  +  2  (as  +  a2 

between  0.10  to  100.  rad/sec,  where  a  =  5.  and  (  —  .5 

Data  will  be  loaded  in  coefficient  form  using  the  command  SPLDC.  Polynomial  arrays  POLYN  and 
POLYD  are  used  with  SPLDC. 

The  FORTRAN  code  for  this  example  is: 


C 

C 

C 

C 


C 

c 

c 


EXAMPLE  1 

LOAD  IN  DATA  USING  LCAP2  OPERATOR  SPLDC  AND  POLYNOMIAL  ARRAYS 
POLYN  AND  POLYD 


A=5 . 

ZETA= .  5 
POLYN ( 1)=0 . 
P0LYN(2)=A*A 
P0LYD(1)=2 . 
P0LYD(2)=A*A 
PQLYD(3)=2* .ZETA*A 
P0LYD(4)=1 . 

CALL  SPLDC(l) 


“degree  of  numerator” 

“coefficient  of  s**0” 

“degree  of  denominator” 
“coefficient  of  s**0” 

“coefficient  of  s**l” 

“coefficient  of  s**2” 

“load  coefficient  data  into  SPTFj 


ENTER  FREQUENCY  RESPONSE  PARAMETERS  FOR  USE  WITH  SFREQ 


FAUT0=1 
RAD=1 
N0MEGA=3 
OMEGA (1)=. 1 
0MEGA(2)=1 . 
0MEGA(3) =100 . 
FDELAY=0 
FNIC0=1 
FB0DE=1 


“.NE.O  (preset  =  l)  for  auto.  freq.  selection  mode  ” 
“.NE.O  (preset  =  l)  for  rad/sec,  otherwise  Hz” 
“number  of  values  of  OMEGA(i)’s  to  be  entered” 
“OMEGA(l)  =  first  frequency  value  to  be  used” 
“user  specified  frequency  value” 
“OMEGA(NOMEG A)  =  last  frequency  value” 
“time  delay  (preset=0)” 

“.NE.O  (preset  =  0)  for  Nichols  plot” 

“.NE.O  (preset  =  0)  for  Bode  plots” 
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CYCLE=0 


“.EQ.O  for  auto,  selection  of  2  or  3  cycle  for  Bode 
plots  (1  cycle  is  not  available)” 

FNYQS=1  “.NE.O  (preset  — 0)  for  Nyquist  plot” 

NQDB=1  “.NE.O  (preset  =  0)  for  hardcopy  NYQUIST  plot  in  dB’ 

GRAFP=1  “.NE.O  (preset  -l)  for  low  resolution  plot” 

HRDCPY=1  “.NE.O  (preset  0)  for  high  resolution  plot” 

ENTER  PLOT  TITLE 

TITLE1  =  'EXAMPLE  1  S  PLANE  FREQUENCY  RESPONSE' 

CALL  SFREQ(l)  “compute  frequency  response  of  SPTFi” 


The  FORTRAN/ PRECMP  code  for  this  example  is: 


EXAMPLE  1 


LOAD  IN  DATA  USING  LCAP2  OPERATOR  SPLDC  AND  POLYNOMIAL  ARRAYS 
POLYN  AND  POLYD 


ZETA= .  5 

♦POLYN  0  A* A  !  DEG.  OF  NUM. ,  COEFF.  IN  ASCENDING  ORDER 

♦POLYD  2  A*A  2 . ♦ZETA*A  1  !  DEG.  OF  DENOM. ,  COEFF.  IN  ASCENDING  ORDER 

♦SPLDC  1  !  LOAD  COEFFICIENT  DATA  INTO  SPTF(l) 

C  . 

C  ENTER  FREQUENCY  RESPONSE  PARAMETERS  FOR  USE  WITH  SFREQ 


FAUTU=1 

RAD=1 

N0MEGA=3 

♦OMEGA  .11.  100. 

FDELAY=0 
FNIC0=1 
FB0DE=1 
CYCLE=0 

FNYQS=1 

NQDB=1 

GRAFP=1 

HRDCPY=1 


“.NE.O  (preset=l)  for  auto.  freq.  selection  mode  ” 
“.NE.O  (preset  =  l)  for  rad/sec,  otherwise  Hz” 

“number  of  values  of  OMEGA(i)’s  to  be  entered” 
0MEGA(1)=FIRST  FREQ.,  OMEGA (N0MEGA)=LAST  FREQ. 

“time  delay  (preset  =  0)” 

“.NE.O  (preset^O)  for  Nichols  plot” 

“.NE.O  (preset  =  0)  for  Bode  plots” 

“.EQ.O  for  auto,  selection  of  2  or  3  cycle  for  Bode 
plots  (1  cycle  is  not  available)” 

“.NE.O  (preset  — 0)  for  Nyquist  plot” 

“.NE.O  (preset  -0)  for  hardcopy  NYQUIST  plot  in  dB’ 
“.NE.O  (preset=l)  for  low  resolution  plot” 

“.NE.O  (preset-0)  for  high  resolution  plot” 


♦SFREQ 


ENTER  PLOT  TITLE 

TITLE1  =  'EXAMPLE  1  S  PLANE  FREQUENCY  RESPONSE’ 
1  !  COMPUTE  FREQUENCY  RESPONSE  OF  SPTF(l) 


J 


The  printer  output  for  this  example  is: 

I 

DEGREE  OF  POLYN  IS  0  (COEFFICIENTS  IN  ASCENDING  ORDER) 

25. 

DEGREE  OF  POLYD  IS  2  (COEFFICIENTS  IN  ASCENDING  ORDER) 

25.  5.  1. 

************************************************************ 

*  SPLDC  -  LOAD  TRANSFER  FUNCTION  IN  COEFFICIENT  FORM  * 
************************************************************ 

DEGREE  OF  NUMERATOR  OF  SPTFi  IS  0  (COEFFICIENTS  IN  ASCENDING  ORDER) 
25. 

DEGREE  OF  DENOMINATOR  OF  SPTFI  IS  2  (COEFFICIENTS  IN  ASCENDING  ORDER) 
25.  5.  1. 

BODE  GAIN  =  1.0000000 


CP=  6.57 


************************************************************ 

*  SFREQ  -  FREQUENCY  RESPONSE  OF  S-PLANE  TRANSFER  * 

*  FUNCTION  1  * 

************************************************************ 


TRANSPORT  DELAY  OR  DEAD  TIME  FOR  S-PLANE  FREQUENCY  RESPONSE  (FDELAY)  =0. 
AUTOMATIC  FREQUENCY  MODE  IF  FAUTO.NE.O,  FAUTO  =  1.000 


NOMEGA  =  3.000 

OMEGA  =  .1000 

,  1.000 

,  100.0 

» 

OMEGA 

REAL 

IMAGINARY 

DB 

PHASE 

PHASE 

RAD/SEC 

MARGIN 

.1000 

.  100E+01 

-.200E-01 

.002 

uO 

tH 

H 

1 

178.85 

.1200 

. 100E+01 

- .240E-01 

.003 

1 

CO 

00 

178.62 

.1440 

. 100E+01 

- . 288E-01 

.004 

-1.65 

178.35 

.1728 

. 100E+01 

- . 346E-01 

.005 

-1.98 

178.02 

.2074 

. 100E+01 

- . 415E-01 

.007 

-2.38 

177.62 

.2488 

. 100E+01 

- . 499E-01 

.011 

-2.86 

177.14 

.2986 

. 100E+01 

-.599E-01 

.015 

-3.43 

176.57 

.3583 

. 100E+01 

- . 720E-01 

.022 

-4.12 

175.88 

.4300 

. 100E+01 

-.866E-01 

.032 

-4.95 

175.05 

.5160 

. 100E+01 

- . 104E+00 

.046 

-5.95 

174.05 

.6192 

. 100E+01 

- . 126E+00 

.066 

-7.17 

172.83 

.7430 

. 100E+01 

- . 152E+00 

.095 

-8.64 

171.36 

.8916 

. 999E+00 

- . 184E+00 

.136 

-10.44 

169.56 
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4  '■'OO 

. 998E+00 

- . 208E+00 

.170 

-11.77 

168.23 

1.0 

.981E+00 

- . 406E+00 

.520 

-22.47 

157.53 

2.440 

. 931E+00 

- .  596E-1 00 

.869 

-32.64 

147.36 

3.080 

. 812E+00 

- . 806E+00 

1.166 

-44.79 

135.21 

3.560 

. 657E+00 

- .949E+00 

1.249 

-55.30 

124.70 

4.040 

.449E+00 

- . 104E+01 

1.116 

-66.75 

113.25 

4.520 

. 215E+00 

- . 106E+01 

.703 

-78.57 

101.43 

5.000 

. 227E-13 

- .  100E+01 

.000 

-90.00 

90.00 

5.480 

- . 162E+00 

- .  883E+00 

-.940 

-100.40 

79.60 

6.120 

- .285E+00 

- . 701E+00 

-2.421 

-112.15 

67.85 

6.920 

- . 332E+00 

- . 503E+00 

-4.399 

-123.48 

56.52 

7.880 

- . 317E+00 

- . 336E+00 

-6.707 

-133.27 

46.73 

8.940 

- . 278E+00 

- .  231E+00 

-8.834 

-140.25 

39.75 

10.12 

- . 226E+00 

- . 148E+00 

-11.363 

-146.83 

33.17 

11.40 

-. 184E+00 

- . 999E-01 

-13.584 

-151.50 

28.50 

13.00 

- . 144E+00 

-.651E-01 

-16.014 

-155.71 

24.29 

14.92 

- . 111E+00 

- . 418E-01 

-18.536 

-159.32 

20.68 

16.84 

- . 874E-01 

- . 285E-01 

-20.731 

-161.96 

18.04 

19.40 

- . 661E-01 

- . 183E-01 

-23.275 

-164.57 

15.43 

21.96 

- . 517E-01 

- . 124E-01 

-25.488 

-166.50 

13.50 

25.16 

- . 394E-01 

- . 816E-02 

-27.902 

-168.31 

11.69 

29.00 

- . 297E-01 

- . 528E-02 

-30.410 

-169.92 

10.08 

32.84 

- . 232E-01 

- . 361E-02 

-32.598 

-171.14 

8.86 

37.96 

- . 173E-01 

-.232E-02 

-35.140 

-172.37 

7.63 

43.08 

- . 135E-01 

-. 158E-02 

-37.354 

-173.29 

6.71 

49.48 

-.102E-01 

- . 104E-02 

-39.774 

-174.17 

5.83 

57.16 

-.765E-02 

-.674E-03 

-42.292 

-174.96 

5.04 

64.84 

- . 595E-02 

- . 461E-03 

-44.489 

-175.56 

4.44 

75.08 

- . 443E-02 

- . 297E-03 

-47.043 

-176.17 

3.83 

85.32 

- . 343E-02 

-.202E-03 

-49.268 

-176.63 

3.37 

98.12 

- . 260E-02 

- . 133E-03 

-51.700 

-177.08 

2.92 

100.0 

- . 250E-02 

- . 125E-03 

-52.030 

-177.13 

2.87 
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NICHOLS  PLOT  (MAGN.  VS  PHASE) 

EXAMPLE  1  S  PLANE  FREQUENCY  RESPONSE 


09/07/88 


0. 

-2.00 

-4.00 

-6.00 

-8.00 

-10.0 

-12.0 

-14.0 

-16.0 

-18.0 

-20.0 

-22.0 

-24.0 

-26.0 

-28.0 

-30.0 

-32.0 

-34.0 

-36.0 


-40.0 

-42.0 

-44.0 

-46.0 

-48.0 


-52.0 

-54.0 

-56.0 

-58.0 

-60.0 

-62.0 


-66.0 

-68.0 


******* 


-******* 


IIIIIIIIII 
-360.000  -288.000  -216.000  -144.000  -72.000 


BODE  PLOT  (MAGN.  VS  FREQ.) 

EXAMPLE  1  S  PLANE  FREQUENCY  RESPONSE 


09/07/88 


16.0  I 

14.0  I 

12.0  I 

10.0  I 

8.00  I 

6.00  I 

4.00  I 

2 . 00  I  **** 

0.  **-**-**-***-**-********** - ** 


-2.00  I 

-4.00  I 

-6.00  I 

-8.00  I 

-10.0  I 

-12.0  I 

-14.0  I 

-16.0  I 

-18.0  I 

-20.0  I 

-22.0  I 

-24.0  I 

-26.0  I 

-28.0  I 

-30.0  I 

-32.0  I 

-34.0  I 

-36.0  I 

-38.0  I 

-40.0  I 

-42.0  I 

-44.0  I 

-46.0  I 

-48.0  I 

50.0  I 

-52.0  I 

-54.0  I 

-56.0  I 

-58.0  I 

-60.0  I 

-62.0  I 

-64.0  I 

-66.0  I 

-68.0  I 

I  I  I  I  I 
. 100E+00  1.00 


* 

* 

** 

** 

** 

* 

* 

* 

** 

** 

** 

* 

* 

* 

** 

** 

** 

* 

++ 

♦ 

* 


I  I  I  I  I  I 
10.0  100. 
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BODE  PLOT  (PHASE  VS  FREQ.) 

EXAMPLE  1  S  PLANE  FREQUENCY  RESPONSE 


09/07/88 


30.0 

20.0 

10.0 

0. 

-10.0 

-20.0 

-30.0 

-40.0 

-50.0 

-60.0 

-70.0 

-80.0 

-90.0 

-100. 

-110. 

-120. 

-130. 

-140. 

-150. 

-160. 

-170. 

-180. 

-190. 

-200. 

-210. 

-220. 

-230. 

-240. 

-250. 

-260. 

-270. 

-280. 

-290. 

-300. 

-310. 

-320. 

-330. 

-340. 

-350. 

-360. 

-370. 

-380. 

-390. 


I 

I 

I 


**-**-**-**♦ 


I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

r 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i 

i  i 
. 100E+00 


**  **** 

**** 


** 

*** 

** 

*% 

** 

* 

** 

** 

* 

* 

** 

*** 

*** 

**** 

********** 

***** 


I  I  I  I  I  I 

1.00  10.0 


I  I 

100. 


I 
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EYQUIST  PLOT 

EXAMPLE  1  S  PLASE  FREQUENCY  RESPOSSE 


4.20 
4.00 

3.80 

3.60 

3.40 

3.20 
3.00 

2.80 

2.60 

2.40 

2.20 
2.00 
1.80 
1.60 

1.40 
1.20 
1.00 
.800 
.600 
.400 
.200 

0. 

-.200 

-.400 

-.600 

-.800 

-1.00 

-1.20 

-1.40 

-1.60 

-1.80 

-2.00 

-2.20 

-2.40 

-2.60 

-2.80 

-3.00 

-3.20 

-3.40 

-3.60 

-3.80 

-4.00 

-4.20 


I  I  I  I 
-2.50  -2.00  -1.50  -1.00 


I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 


— *** - * 

***  X  * 

*  I  * 

*  I  * 

**  I  *** 

*********** 


I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I  I  I  I 

50  .00  .50  1.00 


I 

1.50 


09/07/88 


I  I 
2.00  2.50 
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8.2  Example  2  -  Roots  of  a  Polynomial 

Problem:  Compute  roots  of  the  polynomial 


x3  +  13z2  +  38s2  ■+  34 
The  FORTRAN  code  for  this  example  is: 


C  EXAMPLE  2 

C  LOAD  IN  DATA  USING  LCAP2  OPERATOR  PRTS  AND  POLYNOMIAL  ARRAY  POLY 
C 

P0LY(1)=3 
P0LY(2)=34. 

P0LY(3)=38 . 

POLY (4)=13 . 

POLY (5)=1 . 

CALL  PLDC(l) 

C  .... 

CALL  PRTS(l)  “find  roots  of  POL Yj” 

C  . 


“degree  of  polynomial” 

“coefficient  of  x**0” 

“coefficient  of  x**l” 

“coefficient  of  x**2” 

“coefficient  of  x**3” 

“load  coefficient  data  into  POLYi 


| _ 

The  FORTRAN /PRCMP  code  for  this  example  is: 


C  EXAMPLE  2 

C  LOAD  IN  DATA  USING  LCAP2  OPERATOR  PRTS  AND  POLYNOMIAL  ARRAY  POLY 

C 

♦POLY  3  34.  38.  13.  1  !  DEG.  OF  POLY.,  COEFF.  IN  ASCENDING  ORDER 

♦PLDC  1  !  LOAD  COEFFICIENT  DATA  INTO  P0LY(1) 

C  . 

♦PRTS  1  !  FIND  ROOTS  OF  P0LY(1) 

C  . 


I _ I 

The  printer  output  for  this  example  is: 


DEGREE  OF  POLY  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

34.  38.  13.  1. 


•ft********************************************************** 


8  -  it) 


*  PLDC  -  POLYNOMIAL  LOAD  IN  COEFFICIENT  FORM  * 

************************************************************ 

DEGREE  OF  POLY1  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

34.  38.  13.  1. 


CP=  6.89 

DEGREE  OF  POLY1  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

34.  38.  13.  1. 

************************************************************ 

*  PRTS  -  FIND  ROOTS  OF  POLY1  * 

************************************************************ 

THE  ROOTS  OF  ROOT1  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -1.8446105  -.49938380  1.9109168  .96524896 

2  -1.8445105  .49938380  1.9109168  .96524896 

3  -9.3109790  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  34.000000 

DEGREE  OF  P0LY1  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

34.  38.  13.  1. 


CP=  6.89 
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8.3  Example  3  -  Multiply  Two  S  Plane  Transfer  Functions 

Problem:  Multiply  the  following  two  s  plane  transfer  functions 


25 

s2  +  5s  +  25 


and 


_ 3»q  + 1 _ 

7°(5)(H1)(lfj2+1)(T^2  +  1) 


where  b=10. 


The  first  transfer  function  is  the  same  as  SPTFi  from  Example  1.  The  second  transfer  function  is 
given  in  root  form.  When  transfer  function  data  is  expressed  in  root  form,  gains  associated  with 
the  numerator  mid  denominator  must,  be  specified  to  define  the  transfer  function.  The  gams  used 
by  LCAP2  correspond  to  the  low  order  nonzero  coefficients  of  the  numerator  and  denominator 
polynomials  if  the  root  form  were  expanded  out.  For  this  example,  these  two  gains  would  be  30 
and  70.  (A  distinction  is  made  for  the  low  order  nonzero  coefficient  since  the  low  order  coefficient 
can  be  zero  as  in  the  case  for  the  denominator  above.) 

The  FORTRAN  code  for  this  example  is: 


C  EXAMPLE  3 

C 

C  FIRST  TRANSFER  FUNCTION  IS  THE  SAME  AS  SPTFI  OF  EXAMPLE  1 
C 

C  LOAD  IN  ROOT  DATA  USING  SUBROUTINE  SPLDR  AND  POLYNOMIAL 
C  ARRAYS  R00TN  AND  R00TD 

C 

R00TN(1)=(1. ,30.) 

B=10 . 

R00TN(2)=CMPLI(-B,O.) 

R00TD(1)=(4. .70.) 

R00TD(2)=(-1. .2.) 

R00TD(3)=(-1. ,-2.) 

R00TD(4)=(-7. .0.) 

R00TD(5)=(O. ,0.) 

CALL  SPLDR(2) 

C  . 

C  MULTIPLY  THE  TWO  TRANSFER  FUNCTIONS 

CALL  SPMPY(3,1„2)  “multiply  SPTFj  and  SPTF2  and  store  in  SPTF3 

C  . 


I - 1 

The  FORTRAN/PRECMP  code  for  this  example  is: 

/ 

I  ‘  - -  I 


“real  part  =  no.  of  roots 

imaginary  part  =  low  order  nonzero  coeff.  of  num.” 
“first  root” 

“real  part  =  no.  of  roots 

imagi  >ry  part  =  low  order  nonzero  coeff.  of  denom. 
“first  ro  .  " 

“second  root” 

“third  root” 

“fourth  root 

“load  root  data  into  SPTF2” 
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C  EXAMPLE  3 

C 

C  FIRST  TRANSFER  FUNCTION  IS  THE  SAME  AS  SPTF1  OF  EXAMPLE  i 
C 

C  LOAD  IN  ROOT  DATA  USING  SUBROUTINE  SPLDR  AND  POLYNOMIAL 

C  ARRAYS  ROOTN  AND  ROOTD 

C 

B=10 . 

♦ROOTN  30.  B.  !  GAIN,  ROOT  LIST 

♦ROOTD  70.  (-1..2.)  -7,  0.  !  GAIN,  ROOT  LIST 

♦SPLDR  2  !  LOAD  ROOT  DATA  INTO  SPTF(2) 

C  . 

C  MULTIPLY  THE  TWO  TRANSFER  FUNCTIONS 

♦SPMPY  312!  MULTIPLY  SPTF(l)  AND  SPTF(2)  AND  STORE  INTO  SPTF(3) 
C  . 


I _ | 

The  printer  output  for  this  example  is: 

I - 1 

THE  ROOTS  OF  ROOTN  ARE 

IMAG.  OMEGA  ZETA 

0. 

THE  ROOTS  OF  ROOTD  ARE 

IMAG.  OMEGA  ZETA 

2.0000000 
-2.0000000 
0. 

0. 

************************************************************ 

♦  SPLDR  -  LOAD  TRANSFER  FUNCTION  IN  ROOT  FORM  ♦ 

♦♦♦♦♦♦«♦♦♦♦♦♦♦♦♦♦♦♦*♦*♦♦♦♦♦*♦♦♦♦**♦♦♦♦*♦♦♦♦*♦♦♦♦♦*♦*♦♦****** 

THE  NUMERATOR  ROOTS  OF  SR00T2  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -10.000000  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  30.000000 


NO .  REAL 

1  -10.000000 


NO .  REAL 

1  -1.0000000 

2  -1.0000000 

3  -7.0000000 

4  0. 
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THE  DENOMINATOR  ROOTS  OF  SR00T2  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -1.0000000  2.0000000  2.2360680  .44721360 

2  -1.0000000  -2.0000000  2.2360680  .44721360 

3  -7.0000000  0. 

4  0.  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  70.000000 

DEGREE  OF  NUMERATOR  OF  SPTF2  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 
30.  3. 

DEGREE  OF  DENOMINATOR  OF  SPTF2  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  70.  38.  18.  2. 

BODE  GAIN  =  .42857143 


CP=  6.90 

DEGREE  OF  NUMERATOR  OF  SPTF1  IS  0  (COEFFICIENTS  IN  ASCENDING  ORDER) 

25. 

DEGREE  OF  DENOMINATOR  OF  SPTF1  IS  2  (COEFFICIENTS  IN  ASCENDING  ORDER) 
25.  5.  1. 

BODE  GAIN  =  1.0000000 

THE  NUMERATOR  ROOTS  OF  SR00T2  ARE 
NO.  REAL  IMAG.  OMEGA  ZETA 

1  -10.000000  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  30.000000 

THE  DENOMINATOR  ROOTS  OF  SR00T2  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -1.0000000  2.0000000  2.2360680  .44721360 

2  -1.0000000  -2.0000000  2.2360680  .44721360 

3  -7.0000000  0. 

4  0.  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  70.000000 

DEGREE  OF  NUMERATOR  OF  SPTF2  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 
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30.  3. 


DEGREE  OF  DENOMINATOR  OF  SPTF2  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  70.  38.  18.  2. 

BODE  GAIN  =  .42857143 


*********************************************** 
*  SPTF3  =  SPTF1  *  SPTF2  * 

*********************************************** 


DEGREE  OF  NUMERATOR  OF  SPTF3  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 
750.  75. 

DEGREE  OF  DENOMINATOR  OF  SPTF3  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  1750.  1300.  710.  178.  28.  2. 

BODE  GAIN  =  .42857143 


CP=  6.91 


Note  that  if  the  second  transfer  function  were  expressed  in  a  different  form,  the  numerator  and 
denominator  nonzero  coefficients  would  not  necessarily  appear  explicitly.  For  example,  if  the  root 
locus  representation  were  used,  i.e., 

3(s  +  10) 

2(s  +  7)(a  +  1  +  j'2)(s+  1  -  ;2) 

then, 


numerator  low  order  nonzero  coefficient  =  (3)(10)  =  30 
denominator  low  order  nonzero  coefficient  =  (2)(7)(l+j2)(l-j2)  =  70 


8.4  Example  4  -  Closed  Loop  S  Plane  Transfer  Function 


Problem:  Given  open  loop  transfer  functions  G(s)  and  feedback  transfer 
H(s)  where 

15 

s3  +  6s2  +  5s 

H(s)  = 
v  s  +  15 

compute  the  closed  loop  transfer  function  F(s)  where 

G(s) 


F(s) 


l  +  G(a)H{a) 


The  FORTRAN  code  for  this  example  is: 


1 

c 

EXAMPLE  4 

\ 

c 

LOAD  IH  COEFFICIENTS 

OF  G(S) 

POLYN(1)=0 

“degree  of  num.” 

P0LYN(2)=15. 

“coefficient  of  s**0” 

P0LYD(1)=3 

“degree  of  denom.” 

P0LYD(2)=O. 

“coefficient  of  s**0” 

P0LYD(3)=5 . 

“coefficient  of  s**l” 

F0LYD(4)=6 . 

“coefficient  of  s**2” 

P0LYD(5)  =  1 . 

“coefficient  of  s**3” 

PRINT  * , ’G(S)  IS  IN 

SPTF4' 

CALL  SPLDCC4) 

“load  G(s)  data  into  SPTF4” 

c 

LOAD  IN  COEFFICIENTS 

OF  H(S) 

P0LYN(1)=1 . 

“degree  of  num.” 

P0LYN(2)=1 . 5 

“coefficient  of  s**0” 

P0LYN(3)=1 . 

“coefficient  of  s**l” 

P0LYD(1)  =  1 . 

“degree  of  denom.” 

P0LYD(2)=15 . 

“coefficient  of  s**0” 

P0LYD(3)=1. 

“coefficient  of  s**2” 

PRINT  * , ’H(S)  IS  IN 

SPTF5 ’ 

r 

CALL  SPLDC(5) 

“load  H(s)  data  into  SPTF5” 

PRINT  *.* CLOSED  LOOP 

T.F. 

IS  IN  SPTF9 ’ 

c 

i _ 

CALL  SPCLSLP(9 , 4,5) 

“compute  closed  loop  transfer  function” 

1 

The  FORTRAN/PRECMP  code  for  this  example  is; 


8-16 


C  EXAMPLE  4 

C  LOAD  IN  COEFFICIENTS  OF  G(S) 

C 

♦POLYN  0  15.  !  DEG.  OF  NUM.,  COEFF.  IN  ASCENDING  ORDER 

♦POLYD  30.  5.  6.  1.  !  DEG.  OF  DENOH.,  COEFF.  IN  ASCENDING  ORDER 

PRINT  ♦.’G(S)  IS  IN  SPTF4’ 

♦SPLDC  4  !  LOAD  G(S)  DATA  INTO  SPTF(4) 

C  . 

C  LOAD  IN  COEFFICIENTS  OF  H(S) 

POLYN  1  1.5  1.  !  DEG.  OF  NUM.,  COEFF.  IN  ASCENDING  ORDER 

POLYD  1  15.  1.  !  DEG.  OF  DENOM.,  COEFF.  IN  ASCENDING  ORDER 

PRINT  ♦,’H(S)  IS  IN  SPTF5* 

♦SPLDC  5  !  LOAD  H(S)  DATA  INTO  SPTF(S) 

C  ....... 

PRINT  ♦  . ’CLOSED  LOOP  T.F.  IS  IN  SPTF9 ' 

♦SPCLSLP  945!  COMPUTE  CLOSED  LOOP  TRANSFER  FUNCTION 
C  . 


L 


The  printer  output  for  this  example  is: 


J 


G(S)  IS  IN  SPTF4 

DEGREF,  OF  POLYN  IS  0  (COEFFICIENTS  IN  ASCENDING  ORDER) 

15. 

DEGREE  OF  POLYD  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

0.  5.  6.  1. 

************************************************************ 

*  SPLDC  -  LOAD  TRANSFER  FUNCTION  IN  COEFFICIENT  FORM  * 
************************************************************ 

DEGREE  OF  NUMERATOR  OF  SPTF4  IS  0  (COEFFICIENTS  IN  ASCENDING  ORDER) 
15. 

DEGREE  OF  DENOMINATOR  OF  SPTF4  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  5.  6.  1. 

BODE  GAIN  =  3.0000000 


CP=  6.92 

H(S)  IS  IN  SPTF5 

DECREE  OF  POLYN  IS  1  (uOtfi- ICIENTS  IN  ASCENDING  ORDER) 
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1.5  1. 


DEGREE  OF  PQLYD  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 

15.  1. 

************************************************************ 

*  SPLDC  -  LOAD  TRANSFER  FUNCTION  IN  COEFFICIENT  FORM  * 
#**************************##*********  +  *»**************.***>** 

DEGREE  OF  NUMERATOR  OF  SPTF5  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 

1.5  1. 

DEGREE  OF  DENOMINATOR  OF  SPTF5  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 
15.  1. 

BODE  GAIN  =  . lOOOOOOOE+OO 


CP=  6.92 

CLOSED  LOOP  T.F.  IS  IN  SPTF9 

DEGREE  OF  NUMERATOR  OF  SPTF4  IS  0  (COEFFICIENTS  IN  ASCENDING  ORDER) 
15. 

DEGREE  OF  DENOMINATOR  OF  SPTF4  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  5.  6.  i. 

BODE  GAIN  =  3.0000000 

DEGREE  OF  NUMERATOR  OF  SPTF5  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 

1.5  1. 

DEGREE  OF  DENOMINATOR  OF  SPTF5  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 
15.  1. 

BODE  GAIN  =  . lOOOOOOOE+OO 

**************************•*************,******* 

*  SPTF9  =  SPTF4  /(  1.  +  SPTF5  )  * 

*********************************************** 

DEGREE  OF  NUMERATOR  OF  SPTF9  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 

225.  15. 

DEGREE  OF  DENOMINATOR  OF  SPTF9  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 

22.5  90.  95.  21.  1. 

BODE  GAIN  =  10.000000 
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8.5  Example  5  -  S  Plane  Root  Locus 


Problem:  Compute  the  root  locus  for  the  following  transfer  function 


_ L!ii> _ 

-U  +  Ud  +  iXi^iXssTr  “) 

bv  varying  the  nominal  gain  from  .125  to  2. 

The  FORTRAN  code  for  this  example  is: 


C 

C 

C 


C 

C 

C 


C 


EXAMPLE  5 

LOAD  IK  ROOT  DATA  FOR  TRANSFER  FUNCTION 


ROOTN ( 1)=( 1 . ,1.8) 


R00TN(2)=(-1 . ,0. ) 
R00TD(1)=(5. ,1.) 


R00TD(2)=(-5. ,-1.) 
R00TD(3)  =  (-S.  ,1.) 
R00TD(4)=(-3. ,0. ) 
R00TD(5)  =  (-2.  .0.) 
R00TD(6)=(O. ,0.) 
CALL  SPLDR(IO) 


“real  part  -  no.  of  roots 

imaginary  part  —  low  order  nonzero  coeff.  of  num.” 
“first  root” 

“real  part  =  no.  of  roots 

imaginary  part  =  low  order  nonzero  coeff.  of  denom.” 
“first  root” 

“second  root” 

“third  root” 

“fourth  root” 

“fifth  root” 

“data  stored  in  SPTFi0 


ENTER  ROOT  LOCUS  PARAMETERS  FOR  USE  WITH  SLOCI 


NL0CI=2 
KGAIN(1)= . 12E 
KGAIN (2) =2 . 
KFLG=0 

KDELT=2 

GRAFP=1 

HRDCPY=1 

RLXMIN=-9 

RLXMAX=1 

RLYMIN=-1 

RLYMAX=9 


“number  of  values  of  KGAIN  to  be  entered” 
“KGAIN(l)  =  first  gain  value  to  be  used, 

“KG  AIN(NLOCI)=last  gain  value  to  be  used” 

.EQ.O  to  increment  gain  by  multiplying  by  KDELT 
.NE.O  to  increment  gain  by  adding  by  KDELT” 
“value  for  changing  gains  (preset  =  l.E-4  so  that  no 
additional  gains  are  computed  by  the  program” 
“.NE.O  (preset  =  1)  for  low  resolution  printer  plot” 
“.NE.O  (preset- 0)  for  high  resolution  hardcopy  plot” 
“min.  x  axis  for  plot” 

“max.  x  axis  for  plot” 

“auto,  scaling  for  x  axis  if  RLXMN  =  RLXMX” 

“min.  y  axis  for  plot” 

“max.  y  axis  for  plot” 

“auto,  scaling  for  y  axis  if  RLYMN  =  RLYMX” 


TITLE1  =  ’EXAMPLE  5  S  PLANE  ROOT  LOCUS’ 

CALL  SLOCK  10)  ’’compute  root  loci  of  SPTF5” 
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The  FORTR AN/PRECMP  rode  for  this  example  is: 


C  EXAMPLE  5 

C  LOAD  IN  ROOT  DATA  FOR  TRANSFER  FUNCTION 

C 

♦ROOTN  1.8-1  !  GAIN,  ROOT  LIST 

♦ROOTD  1.  (-5..1.)  -3.  -2.  0.  !  GAIN,  ROOT  LIST 

♦SPLDR  10  !  LOAD  ROOT  DATA  INTO  SPTF(IO) 

C  . 

C  ENTER  ROOT  LOCUS  PARAMETERS  FOR  USE  WITH  SLOCI 

C 

NL0CI=2  “number  of  values  of  KGAIN  to  be  entered” 

KGAIN  .125  2.  !  KGAIN(l)=FIRST  GAIN , KGAIN (NLOCI)=LAST  GAIN 

KFLG=0 

KDELT=2 

GRAFP=1 
HRDCPY=1 
RLXMIN=-9 
RLXMAX=1 

RLYMIN=-1 
RLYMAX=9 

TITLE1  =  'EXAMPLE  5  S  PLANE  ROOT  LOCUS’ 

♦SLOCI  10  !  COMPUTE  ROOT  LOCI  OF  SPTF(5) 

C  . 


.EQ.O  to  increment  gain  by  multiplying  by  KDELT 
.NE.O  to  increment  gain  by  adding  by  KDELT” 
“value  for  changing  gains  (preset=l.E-4  so  that  no 
additional  gains  are  computed  by  the  program” 
“.NE.O  (preset  =  l)  for  low  resolution  printer  plot” 
“.NE.O  (preset  =  0)  for  high  resolution  hardcopy  plot” 
“min.  x  axis  for  plot” 

“max.  x  axis  for  plot” 

“auto,  scaling  for  x  axis  if  RLXMN=RLXMX” 

“min.  y  axis  for  plot” 

“max.  y  axis  for  plot” 

“auto,  scaling  for  y  axis  if  kLYMN = RLYM X ” 


L 


J 


The  printer  output  for  this  example  is: 

f 

THE  ROOTS  OF  ROOTN  ARE 

NO.  REAL  IHAG.  OMEGA  ZETA 

1  -1.0000000  0. 

THE  ROOTS  OF  ROOTD  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -S. 0000000  -1.0000000 

2  -5.0000000  1.0000000 

3  -3.0000000  0. 

4  -2.0000000  0. 

5  0.  0. 

************************************************************ 

*  SPLDR  -  LOAD  TRANSFER  FUNCTION  IN  ROOT  FORM  * 

************************************************************ 

THE  NUMERATOR  ROOTS  OF  SROOTIO  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -1.0000000  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  1.8000000 


THE  DENOMINATOR  ROOTS  OF  SROOTIO  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-5.0000000 

-1.0000000 

5.0990195 

.98058068 

2 

-5.0000000 

1.0000000 

5.0990195 

.98058068 

-3.0000000 

0. 

4 

-2.0000000 

o , 

0. 

0. 

LOW  ORDER  NONZERO 

COEFFICIENT  = 

1.0000000 

DF.fc 

.1.x.  OF  NUMERATOR 

OF  SPTF10  IS  1 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

■  .6  1.8 

DEGREE  OF  DENOMINATOR  OF  SPTF10  IS  5  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  1.  1.217948717949  .525641025641  .09615384615386  .006410256410256 
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BODE  GAIN  =  1.8000000 


THE  NUMERATOR  ROOTS  OF  SR00T10  ARE 


CP=  6.95 


NO. 

1 


NO. 


REAL 

IMAG. 

OMEGA 

ZETA 

-1.0000000 

0. 

LOW 

ORDER  NONZERO 

COEFFICIENT  = 

1.8000000 

THE 

DENOMINATOR  ROOTS  OF  SROOTIO 

ARE 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-5.0000000 

-1.0000000 

5.0990195 

2 

-5.0000000 

1.0000000 

5.0990195 

3 

-3.0000000 

0. 

4 

-2.0000000 

0. 

5 

0. 

0. 

.98058068 

.98058068 


LOW  ORDER  NONZERO  COEFFICIENT  =  1.0000000 


DEGREE  OF  NUMERATOR  OF  SPTF10  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 

1.8  1.8 

DEGREE  OF  DENOMINATOR  OF  STTF10  IS  5  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  1.  1.217948717949  .525641025641  .09615384615385  .006410256410256 

BODE  GAIN  =  1.8000000 


************************************************************ 

*  SLOCI  -  ROOT  LOCUS  OF  S-PLANE  TRANSFER  * 

*  FUNCTION  1  * 

************************************************************ 


THE  OPEN 

LOOP 

ZEROES  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-1.0000000 

0. 

THE  OPEN 

LOOP 

POLES  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-5.0000000 

-1.0000000 

5.0990195 

.98058068 
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5.0990195 


.98058068 


2 

-5.0000000 

1.0000000 

3 

-3.0000000 

0. 

4 

-2.0000000 

0. 

5 

0. 

0. 

CLOSED 

LOOP  POLES  FOR 

GAIN  =  .12500000 

(GAIN  NO. 

1)  ARE 

NO. 

REAL 

IHAG. 

OMEGA 

ZETA 

1 

-1.7947341 

-1.1077310 

2.1090611 

.85096357 

2 

-1.7947341 

1.1077310 

2.1090611 

.85096357 

3 

-5.5892217 

-1.6614254 

5.8309290 

.95854737 

4 

-5.5892217 

1.6614254 

5.8309290 

.96854737 

5 

-.23208832 

0. 

CLOSED 

LOOP  POLES  FOR 

GAIN  =  .25000000 

(GAIN  NO. 

2)  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-1.4171985 

-1.4418858 

2.0217532 

.70097500 

2 

-1.4171985 

1.4418858 

2.0217532 

.70097500 

3 

-5.8577544 

-1.9606112 

6.1771582 

.94829277 

4 

-5.8577544 

1.9606112 

6.1771582 

.94829277 

5 

-.45009415 

0. 

CLOSED 

LOOP  POLES 

FOR 

GAIN  =  .50000000 

(GAIN  NO. 

3)  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-.94735061 

-1.9000842 

2.1231564 

.44619915 

2 

-.94735061 

1.9000842 

2.1231564 

.44619915 

3 

-6.1975818 

2.3343777 

6.6226384 

.93581763 

4 

-6.1975818 

-2.3343777 

6.6226384 

.93581763 

5 

-.71013518 

0. 

CLOSED 

LOOP  POLES 

FOR 

GAIN  =  1.0000000 

(GAIN  NO. 

4)  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-.44922549 

-2.4680974 

2.5086468 

.17907084 

2 

-.44922549 

2.4680974 

2.5086468 

. 17907084 

3 

-6.6183282 

2.7904455 

7.1825382 

.92144699 

4 

-6.6183282 

-2.7904455 

7.1825382 

.92144699 

5 

-.86489263 

0. 
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CLOSED 

LOOP  POLES  FOR 

GAIN  =  2.0000000 

(GAIN  NO. 

5)  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.10025104 

-3.1088677 

3.1104837 

- . 32230049E-01 

2 

.10025104 

3.1088677 

3.1104837 

- . 32230049E-01 

3 

-7.1323100 

-3.3395771 

7.8754442 

.90563907 

4 

-7.1323100 

3.3395771 

7.8754442 

.90563907 

5 

-.93588209 

0. 
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ROOT  LOCUS 

EXAMPLE  5  S  PLANE  ROOT  LOCUS 


09/07/88 


10.2  I 

9.90  I 

9.60  I 

9.30  I 

9.00  I 

8.70  I 

8.40  I 

8.10  I 

7.80  I 

7.50  I 

7.20  I 

6.90  I 

6.60  I 

6.30  I 

6.00  I 

5.70  I 

5.40  I 

5.10  I 

4.80  I 

4.50  I 

4.20  I 

3.90  I 

3.60  I 

3.30  *  I 

3.00  I* 

2.70  *  I 

2.40  *  *  I 

2.10  *  I 

1.80  *  *  I 

1.50  *  I 

1.20  *  I 

.900  I 

.600  I 

.300  I 

0.  - ****-*1- 

-.300  I 

-.600  I 

-.900  I 

-1.20  I 

-1.50  I 

-1.80  I 

-2.10  I 

-2.40  I 

IIIIIIIIII 
-9.00  -8.00  -7.00  -6.00  -5.00  -4.00  -3.00  -2.00  -1.00  .00 


! 


I 

1.00 
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8.6  Example  6  -  Inverse  Laplace  Transform  and  Time  Response 


Problem:  Find  the  inverse  Laplace  transform  and  the  step  response  of  the  following 
transfer  function 


432s  +  4320 

s4  +  35s3  +  345s2  +  1008s  +  2160 

Plot  the  response  in  increments  of  .05  seconds  from  0  to  5  seconds. 
The  FORTRAN  code  for  this  example  is: 


C 

C 

C 


C 

C 

C 


EXAMPLE  6 

LOAD  COEFFICIENT  DATA  FOR 

P0LYN(1)=1 . 

P0LYN(2)=4320. 

P0LYN(3)=432. 

P0LYD(1)=4 
P0LYD(2)=2160 . 
POLYD(3)=1008 . 
P0LYD(4)=345 . 

P0LYD(5)=35. 

P0LYD(6)=1 . 

CALL  SPLDC(ll) 


ENTER  PARAMETERS  FOR  TIME 


TRANSFER  FUNCTION 

“degree  of  numerator” 

“coefficient  of  s**0” 

“coefficient  of  s**l” 

“degree  of  denominator” 
“coefficient  of  s**0” 

“coefficient  of  s**l” 

“coefficient  of  s**2” 

“coefficient  of  s**3” 

“coefficient  of  s**4” 

“load  coefficient  data  into  SPTFU 

RESPONSE 


TTYPE=1 . 

TMAGN=1 . 
TZER0=0 . 
TEND=5 . 
TDELT=. 05 
GRAFP=1 
HRDCPY=1 
TITLE1  = 

+ 'EXAMPLE  6 


“.NE.O  (preset=l)  for  step  response 
.EQ.O  for  impulse  response  ” 

“magnitude  of  the  input” 

“starting  time  for  evaluating  the  response” 

“end  time  for  evaluating  the  response” 

“time  increment  for  evaluating  the  response” 

“.NE.O  (preset  =  l)  for  low  resolution  printer  plot” 
“.NE.O  (preset=0)  for  high  resolution  hardcopy  plot” 


INVERSE  LAPLACE  TRANSFORM  AND  TIME  RESPONSE’ 


CALL  STIME(ll) 


“compute  inverse  Laplace  transform  and  time  response” 


The  FORTRAN/PRECMP  code  for  this  example  is: 


C  EXAMPLE  G 

C  LOAD  COEFFICIENT  DATA  FOR  TRANSFER  FUNCTION 

C 

•POLYN  1  4320  432  !  DEG.  OF  HUM.,  COEFF.  IN  ASCENDING  ORDER 

♦POLYD  4  2160.  1000.  345.  35.  1.  i  DEG.  OF  DENOM.,  COEFF.  IN  ASCENDING  ORD. 

♦SPLDC  11  !  LOAD  COEFFICIENT  DATA  INTO  SPTF(ll) 

C  . 

C  ENTER  PARAMETERS  FOR  TIME  RESPONSE 

C 


TTYPE=1 . 

TMAGN=1 . 

TZER0=0. 

TEND=S . 

TDELT=.05 

GRAFP=1 

HRDCPY=1 


“.NE.O  (preset  =  1)  for  step  response 
.EQ.O  for  impulse  response  ” 

“magnitude  of  the  input” 

“starting  time  for  evaluating  the  response” 

“end  time  for  evaluating  the  response” 

“time  increment  for  evaluating  the  response” 

“.NE.O  (preset  — 1)  for  low  resolution  printer  plot” 
“.NE.O  (preset=0)  for  high  resolution  hardcopy  plot” 


TITLE1  = 

+* EXAMPLE  6  INVERSE  LAPLACE  TRANSFORM  AND  TIME  RESPONSE' 
♦STIME  11  !  COMPUTE  INVERSE  LAPLACE  TRANSFORM  AND  TIME  RESPONSE 

C  . 


I _ I 

The  printer  output  for  this  example  is: 


DEGREE  OF  POLYN 

4320.  432. 

IS  1 

(COEFFICIENTS 

IN 

ASCENDING  ORDER) 

DEGREE  OF  POLYD 

2160.  1008.  346. 

IS  4 

35.  1. 

(COEFFICIENTS 

IN 

ASCENDING  ORDER) 

************ ************************************************ 

*  SPLDC  -  LOAD  TRANSFER  FUNCTION  IN  COEFFICENT  FORM  * 
************************************************************ 

DEGREE  OF  NUMERATOR  OF  SPTF11  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 
4320.  432. 

DEGREE  OF  DENOMINATOR  OF  SPTF11  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 
2160.  1008.  345.  35.  1. 

BODE  GAIN  =  2.0000000 
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THE  NUMERATOR  ROOTS  OF  SROOT11  ARE 


CP=  7.05 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-10.000000 

0. 

LOW 

ORDER  NONZERO 

COEFFICIENT  = 

4320.0000 

THE 

DENOMINATOR  ROOTS  OF  SR00T11 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-1.5000000 

-2.5980762 

3.0000000 

.50000000 

2 

-1.5000000 

2.5980762 

3.0000000 

.60000000 

3 

-12.000000 

0. 

4 

-20.000000 

0. 

LOW 

ORDER  NONZERO 

COEFFICIENT  = 

2160.0000 

DEGREE 

OF  NUMERATOR 

OF 

SPTF11  IS  1 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

4320. 

432. 

DEGREE  OF  DENOKINATOR  OF  SPTF11  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 
2160.  1008.  345.  35.  1. 

BODE  GAIN  =  2.0000000 


************************************************************ 

*  STIME  =  TIME  RESPONSE  OF  S-PLANE  TRANSFER  * 

*  FUNCTION  11  * 

************************************************************ 


COMPUTE  STEP  RESPONSE  IF  TTYPE.NE.O. ,  (TTYPE  =  1.0  ) 

OTHERWISE  COMPUTE  IMPULSE  RESPONSE. 


SCALE  OUTPUT  BY  TMAGN,  (TMAGN  =  1.00000  ) 


NO. 

ROOT 

PARTIAL  FRACTION 

COEFFICIENT 

1 

-1.5000000 

-2.5980762 

-.99977959 

-.69735056 

2 

-1.5000000 

2.5980762 

-.99977959 

.69735056 

3 

-12.000000 

0. 

. 76923077E-01 

0. 

4 

-20.000000 

0. 

- . 77363897E-01 

0 

5 

0. 

0. 

2.0000000 

0. 

ANALYTICAL  SOLUTION  IS  THE  SUMMATION  OF  THE  FOLLOWING  4  TERMS 
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((-2.000  )*(C0S(  2.60 


(  2.0000  )  *  T**  0 

*T) )+(-l . 395  )*(SIN(  2.60  *T)))*E**(  1.50*T) 

(  .76923E-01)  *  E**(  -12.000  *  T) 

(  - . 77364E-01)  *  E**(  -20.000  *  T) 

***  TIME  RESPONSE  *** 


TIME 

VALUE 

TIME 

VALUE 

TIME 

VALUE 

1  . 

0. 

. 50000E-01 

. 66945E-02 

.10000 

.41037E-01 

.15000 

.10879 

.20000 

.20673 

.25000 

.32913 

.30000 

.46993 

.35000 

.62345 

.40000 

.78455 

.45000 

.94871 

.50000 

1.1120 

.55000 

1.2711 

.60000 

1.4233 

.65000 

1.5664 

.70000 

1.6985 

.75000 

1.8186 

.80000 

1.9257 

.85000 

2.0194 

.90000 

2.0997 

.95000 

2.1667 

1.0000 

2.2209 

1.0500 

2.2630 

1.1000 

2.2937 

1.1500 

2.3140 

1 .2000 

2.3249 

1.2500 

2.3276 

1.3000 

2.3230 

1.3500 

2.3123 

1.4000 

2 . 2966 

1.4500 

2.2769 

1 . 5000 

2.2542 

1.5500 

2.2293 

1.6000 

2.2032 

1.6500 

2.1764 

1.7000 

2.1497 

1.7500 

2.1235 

1 . 8000 

2.0985 

1.8500 

2.0749 

1.9000 

2.0530 

1.9500 

2.0330 

2.0000 

2.0152 

2.0500 

1.9995 

2.1000 

1.9860 

2.1500 

1.9747 

2.2000 

1.9655 

2.2500 

1.9582 

2.3000 

1.9529 

2.3500 

1.9493 

2.4000 

1.9472 

2.4500 

1.9466 

2.5000 

1.9471 

2.5500 

1 . 9487 

2.6000 

1.9511 

2.6500 

1.9542 

2.7000 

1.9578 

2.7500 

1.9618 

2.8000 

1.9661 

2.8500 

1.9704 

2.9000 

1.9748 

2.9500 

1.9791 

3.0000 

1.9832 

3.0500 

1.9871 

3.1000 

1.9907 

3.1500 

1.9940 

3.2000 

1.9970 

3.2500 

1.9996 

3.3000 

2.0019 

3.3500 

2.0038 

3.4000 

2.0054 

3.4500 

2.0066 

3.5000 

2.0075 

3.5500 

2.0082 

3.6000 

2.0086 

3.6500 

2.0087 

3.7000 

2.0086 

3.7500 

2.0084 

3.8000 

2.0081 

3.8500 

2.0076 

3.9000 

2.0070 

3.9500 

2.0063 

4.0000 

2.0057 

4.0500 

2.0050 

4.1000 

2.0042 

4.1500 

2.0035 

4.2000 

2.0029 

4.2500 

2.0022 

4.3000 

2.0016 

4.3500 

2.0011 

4.4000 

2.0006 

4.4500 

2.0001 

4.5000 

1.9998 

4.5500 

1.9994 

4.6000 

1.9992 

4.6500 

1.9990 

4.7000 

1.9988 

4.7500 

1.9987 

4.8000 

1.9986 

4.8500 

1.9986 

4.9000 

1.9986 

4.9500 

1.9986 

5.0000 

1.9987 
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TIME  RESPONSE  09/07/88 

EXAMPLE  6  INVERSE  LAPLACE  TRANSFORM  AND  TIME  RESPONSE 


3.30 

I 

3.20 

I 

3.10 

I 

3.00 

I 

2.90 

I 

2.80 

I 

2.70 

I 

2.60 

I 

2. SO 

I 

2.40 

I 

2.30 

I 

2.20 

I 

2.10 

I 

2.00 

I 

1.90 

I 

1.80 

I 

1.70 

I 

1.60 

I 

1.50 

I 

1.40 

I 

1.30 

I 

1.20 

I 

1.10 

I 

1.00 

I 

.900 

I 

.800 

I 

.700 

I 

.600 

I 

.500 

I 

.400 

I 

.300 

I 

.200 

I  * 

.100 

I  * 

). 

**- 

. 100E+00 

I 

.200 

I 

.300 

I 

.400 

I 

.500 

I 

-.600 

I 

.700 

I 

.800 

I 

.900 

I 

I 

.00 

****** 

**  ** 

*  **** 

*  ******  ****************************** 
*  **** 

* 

* 

* 

*  . 

* 


* 


* 

* 


IIIIIIIIII 
.60  1.00  1.50  2.00  2.50  3.00  3.50  4.00  4.50  5.00 
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8.7  Example  7  -  Inverse  Z  Transform 

Problem:  Find  the  inverse  z  transform  and  the  step  response  of  the  following  transfer  function 

a4z4  +  n323  -f  a2z2  +  a4z  +  a0 
b4z 4  +  &3z3  +  b2z2  +  bjz1  +  bo 


where,  do  =  0 

a4  =  -3.64646532E-3 
a2  =  4.90388971E-4 
a3  =  9.10367045E-3 
a4  =  0 


b0  r.r  0.173773943 
=  -1.16046330 

62  =  2.74918160 

63  =  -2.75654438 

64  =  l. 


and  the  sampling  period  is  .05  seconds.  Plot  the  results  from  t  =  0  to  t  =  2.5  seconds. 


Since  the  inverse  is  computed  by  recursive  evaluation  of  a  dirterence  equation  the  results  will  be 
inaccurate  for  higher  order  transfer  functions.  Results  for  typical  transfer  functions  whose  order  is 
less  than  10~15  are  very  good. 

The  FORTRAN  code  for  this  example  is: 


C 

C 

C 


C 

C 

C 


EXAMPLE  7 

LOAD  II  COEFFICIENT  DATA  INTO  ZPTFi 


P0LYN(1)=3 . 

P0LYN(2)=O . 

P0LYN(3)=-3 . 64646532E-3 
P0LYN(4)=4. 90388971E-4 
P0LYN(5) =9 . 10367045E-3 
P0LYD(1)=4. 

P0LYD(2)=. 173773943 
P0LYD(3)=-1. 16046330 
P0LYD(4)=2. 74918160 
P0LYD(5)=-2. 75654438 
P0LYD(6)=1. 

CALL  ZPLDC(l) 


“degree  of  numerator” 
“coefficient  of  z**0” 
“coefficient  of  z**l” 
“coefficient  of  z**2” 
“coefficient  of  z**3” 
“degree  of  denominator” 
“coefficient  of  z**0” 
“coefficient  of  z**l” 
“coefficient  of  z**2” 
“coefficient  of  z**3” 
“coefficient  of  z**4” 


ENTER  TIME  RESPONSE  PARAMETERS  FOR  USE  WITH  ZTIME 


TTYPE=1  “.NE.O  (preset  =  l)  for  step  response 

.EQ.O  for  impulse  response  ” 

TMAGN=1.  “magnitude  of  the  input” 

TEND=2 . 5  “end  time  for  evaluating  the  response” 

SAMPT=.05  “sampling  period” 

TITLE1  = 

+’ EXAMPLE  7  INVERSE  Z  TRANSFORM  AND  TIME  RESPONSE’ 

GRAFP=1  “.NE.O  (preset  =  l)  for  low  resolution  printer  plot” 

HRDCPY=1  “.NE.O  (preset  =  0)  for  high  resolution  printer  plot” 
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c 


CALL  ZTIME(l) 


“compute  inverse  z  transform  of  ZPTFi 


| _ | 

The  FORTRAN/PRECMP  code  for  this  example  is: 

f - 1 

C  EXAMPLE  7 

C  LOAD  IS  COEFFICIENT  DATA  INTO  ZPTFI 

C 

♦POLYN  3  0.  -3.64646532e-3  4. 90388971e-4  9 . 10367045E-3 

♦POLYD  4  .173773943  -1.16046330  2.74918160  -2.75654438  1. 

♦ZPLDC  1  !  LOAD  COEFFICIENT  DATA  INTO  ZPTF(l) 

C  . 

C  ENTER  TIME  RESPONSE  PARAMETERS  FOR  USE  WITH  ZTIME 

C 

TTYPE=1  “.NE.O  (preset  =  l)  for  step  response 

.EQ.G  for  impulse  response  ” 

TMAGN=1.  “magnitude  of  the  input” 

TEND=2.5  “end  time  for  evaluating  the  response” 

SAMPT= .  05  “sampling  period” 

TITLE1  = 

+’ EXAMPLE  7  INVERSE  Z  TRANSFORM  AND  TIME  RESPONSE' 

GRAFP=1  “.NE.O  (preset  =  l)  for  low  resolution  printer  plot” 

HRDCPY=1  “.NE.O  (preset  =  0)  for  high  resolution  printer  plot” 

* ZTIME  1  !  INVERSE  Z  TRANSFORM  OF  ZPTF(l) 

C  . 


I _ I 

The  printer  output  for  this  example  is: 

r - - 1 

DEGREE  OF  POLYS  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

0.  -.00364646532  .000490388971  .00910367045 

DEGREE  OF  POLYD  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 

.173773943  -1.1604633  2.7491816  -2.75664438  1. 

************************************************************ 

*  ZPLDC  -  LOAD  TRANSFER  FUNCTION  IN  COEFFICENT  FORM  * 
************************************************************ 

DEGREE  OF  NUMERATOR  OF  ZPTFI  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

0.  -.00364646532  .000490388971  .00910367045 
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DEGREE  OF  DENOMINATOR  OF  ZPTF1  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 
.173773943  -1.1604633  2.7491816  -2.75654438  1. 


CP=  7.14 

DEGREE  OF  NUMERATOR  OF  ZPTF1  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  -.00364646532  .000490388971  .00910367045 

DEGREE  OF  DENOMINATOR  OF  ZPTF1  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 
.173773943  -1.1604633  2.7491816  -2.75654438  1. 

***********  r*-*******************%*************************** 

*  ZTIME  =  TIME  RESPONSE  OF  Z-PLANE  TRANSFER  * 

*  FUNCTION  1  * 

************************************************************ 


COMPUTE  STEP  RESPONSE  IF  TTYPE.NE.O. ,  (TTYPE  =  1.0  ) 

OTHERWISE  COMPUTE  IMPULSE  RESPONSE. 

SCALE  OUTPUT  BY  TMAGN ,  (TMAGN  =  1.00000  ) 

FINAL  VALUE  =  .999955 


***  TIME  RESPONSE  *** 


TIME 

VALUE 

TIME 

VALUE 

TIME 

VALUE 

. 

0. 

. 50000E-01 

. 91037E-02 

. 10000 

. 34689E-01 

. 15000 

.  76541E-01 

.20000 

. 13214 

.25000 

.19843 

.30000 

.27247 

.35000 

.35152 

.40000 

.43319 

.45000 

.51536 

.50000 

.59622 

.55000 

.67426 

.60000 

.74822 

.65000 

.81715 

.70000 

.88028 

.75000 

.93712 

.80000 

.98736 

.85000 

1.0309 

.90000 

1.0677 

.95000 

1.0979 

1.0000 

1.1219 

1.0500 

1.1400 

1.1000 

1.1527 

1.1500 

1 . 1604 

1.2000 

1.1637 

1.2500 

1.1631 

1.3000 

1.1592 

1.3500 

1.1526 

1.4000 

1.1436 

1.4500 

1.1330 

1.5000 

1.1210 

1.5500 

1.1082 

1.6000 

1.0949 

1.6500 

1.0814 

1.7000 

1.0682 

1.7500 

1.0554 

1.8000 

1.0432 

1.8500 

1.0318 

1.9000 

1.0213 

1.9500 

1.0118 

2.0000 

1.0034 

2.0500 

.99614 

2.1000 

.98994 

2.1500 

.  96**oi 

2.2000 

.98072 

2.2500 

.97759 

2.3000 

.97537 

2.3500 

.97397 

2.4000 

.97330 

2.4500 

.97329 

2.5000 

.97383 
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TIKE  RESPONSE 

EXAMPLE  7  INVERSE  Z  TRANSFORM  AND  TIME  RESPONSE 


1.20  I 

1.17  I 

1.14  I 

1.11  I 

1.08  I 

1.05  I 

1.02  I 

.990  I 

.960  I 

.930  I 

.900  I 

.870  I 

.840  I 

.810  I 

.780  I 

.750  I 

.720  I 

.690  I 

.660  I 

.630  I 

.600  I 

.570  I 

.540  I 

.510  I 

.480  I 

.450  I 

.420  I 

.390  I 

.360  I 

.330  I 

.300  I 

.270  I  * 

.240  I 

.210  I  * 

.180  I 

.  150  I 

.120  I  * 
.900E-01  I  * 

. 600E-01  I 
. 300E-01  I  * 

0.  ** - 


** 

** 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 


**** 


*  ** 

** 


*  ** 

** 


*  ** 

*  *  * 


- . 300E-01  I 
-.600E-01  I 

IIIIIIIII 
.00  .25  .50  .75  1.00  1.25  1.50  1.75  2.00 


09/07/88 


**** 

*  *  *  * 


I  I 
2.25  2.50 
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8.8  Example  8  -  Z  Transform  of  an  S  Plane  Transfer  Function 


Problem:  Compute  the  z  transform  of  the  following  transfer  function  with  a  zero-order  and  a 
delay  of  .008  seconds.  The  sampling  period  is  .08  seconds. 

2900s  +  2900 
s5  +  4s4~  124s3  +  363s2 

The  partial  fraction  method  is  used  to  compute  the  z  transform.  The  algorithm  used  to  compute 
the  partial  fraction  expansion  requires  that  (l)  there  are  no  multiple  poles  other  than  those  at  the 
origin  and  (2)  the  degree  of  the  numerator  must  not  be  greater  than  the  number  of  poles  which  are 
not  at  the  origin.  Up  to  5  poles  at  the  origin  are  allowed  (this  includes  the  ones  from  the  zero-order 
hold  if  selected). 

The  FORTRAN  code  for  this  example  is: 

r - 1 

C  EXAMPLE  8 

C  LOAD  COEFFICIENT  DATA  INTO  SPTF12 

C 

“degree  of  numerator” 

“coefficient  of  s**0” 

“coefficient  of  s**l” 

“degree  of  denominator.” 

“coefficient  of  s**0” 

“coefficient  of s**l” 

“coefficient  of  s**2” 

“coefficient  of  s**3” 

“coefficient  of  s**4” 

“coefficient  of .  ' v 

“load  coefficient  „ato.  .n^o  SPTFi2” 

C . 

C  ENTER  PARAMETERS  FOR  USE  WITH  SZXFM 
C 

SAMPT=.08  “sampling  period” 

DELAY=.008  “time  delay  (preset=0.)” 

(enter  a  negative  value  for  time  advance) 

Z0H=1  “.NE.O  (preset  =  l)  for  inclusion  of  zero  order  hold” 

CALL  SZXFM(2,12)  “compute  z  transform  of  SPTF12  and  store  into  ZPTF2” 

C 


P0LYN(1)=1 
P0LYN(2)=2900 . 
POLYN(3)=2900. 
P0LYD(1)=5 . 
POLYD(2)=0 . 
P0LYD(3)=0 . 
P0LYD(4)=363 . 
P0LYD(5)=124. 
P0LYD(6)=4. 
P0LYD(7)=1 . 
CALL  SPLDC(12) 
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The  FORTRAN/PRECMP  code  for  this  example  is: 


C  EXAMPLE  8 

C  LOAD  COEFFICIENT  DATA  INTO  SPTF12 

C 

♦POLYN  1  2900.  2900.  !  NUMERATOR  DATA 

♦POLYD  50.  0.  363.  124.  4.  1.  !  DENOMINATOR  DATA 

♦SPLDC  12  !  LOAD  COEFFICIENT  DATA  INTO  SPTF(12) 

C . 

C  ENTER  PARAMETERS  FOR  USE  WITH  SZXFM 
C 

SAMPT=.08  “sampling  period” 

DELAY=.008  “time  delay  (preset  =  0.)” 

(enter  a  negative  value  for  time  advance) 

Z0H=1  “.NE.O  (preset=l)  for  inclusion  of  zero  order  hold” 

♦SZXFM  2  12  !  COMPUTE  Z  TRANSFORM  OF  SPTF(12),  STORE  IN  ZPTF(2) 

C  . 

I _ I 


The  printer  output  for  this  example  is: 


DEGREE  OF  POLYN  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 

2900.  2900. 

DEGREE  OF  POLYD  IS  5  (COEFFICIENTS  IN  ASCENDING  ORDER) 

0.  0.  363.  124.  4.  1. 


************************************************************ 
♦  SPLDC  -  LOAD  TRANSFER  FUNCTION  IN  COEFFICENT  FORM  * 
************************************************************ 


DEGREE  OF  NUMERATOR  OF  SPTF12  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 
2900.  2900. 

DEGREE  OF  DENOMINATOR  OF  SPTF12  IS  5  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  0.  363.  124.  4.  1. 

BODE  GAIN  =  7.9889807 


CP=  7.19 

THE  NUMERATOR  ROOTS  OF  SR00T12  ARE 


NO.  REAL  IMAG.  OMEGA  ZETA 
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1  -1.0000000  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  2900.0000 

THE  DENOMINATOR  ROOTS  OF  SR00T12  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

- .50000000 

-10.988630 

11.000000 

. 45454545E-01 

2 

-.50000000 

10.988630 

11.000000 

. 45454545E-01 

3 

-3.0000000 

0. 

4 

0. 

0. 

5 

0. 

0. 

LOW  ORDER  NONZERO 

COEFFICIENT  = 

363.00000 

DEGREE 

OF  NUMERATOR 

OF  SPTF12  IS  1 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

2900.  2900. 

DEGREE  OF  DENOMINATOR  OF  SPTF12  IS  5  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  0.  363.  124.  4.  1. 

CODE  GAIN  =  7.9889807 

***************************** *********** ******* 

*  ZR00T2  =  SZIFM  OF  ZR00T12  * 

*********************************************** 

*********************************************** 

*  ZPTF2  =  SZXFM  OF  ZPTF12  * 

*********************************************** 


SAMPLING  PERIOD,  SAMPT  =  .0800  DELAY  =  .0080  ZOH  =  1 

NO.  ROOT  PARTIAL  FRACTION  EXPANSION  COEFFICIENT 


1 

-.50000000 

-10.988630 

.  96684606E-01 

- . 40456452E-02 

2 

-.50000000 

10.988630 

. 96684606E-01 

. 404S6452E-02 

3 

-3.0000000 

0. 

1.6914552 

0. 

4 

0. 

0. 

-1.8848244 

0. 

5 

0, 

0. 

5.2599625 

0. 

6 

0. 

0. 

7.9889807 

0. 

THE  NUMERATOR  ROOTS 

OF  ZR00T2  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1  -12.268933  0. 
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2 

- . 67135127E 

-04 

0. 

3 

.92311634 

0. 

4 

-.13469859 

0. 

5 

-1.1567519 

0. 

LOW 

ORDER  NONZERO 

COEFFICIENT  = 

- . 23106188E-04 

THE 

DENOMINATOR  ROOTS  OF  ZR00T2 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.61284138 

-.73996066 

.96078944 

-.63785191 

2 

.61284138 

.73996066 

.96078944 

-.63785191 

3 

.78662786 

0. 

4 

1.0000000 

0. 

5 

1.0000000 

0. 

6 

0. 

0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  -46.473538 

DEGREE  OF  NUMERATOR  OF  ZPTF2  IS  S  (COEFFICIENTS  IN  ASCENDING  ORDER) 
-.00002310618764969  -.3443427037531  -2.507846683739  .679417062974  2.464719123011 
. 1950347342841 

DEGREE  OF  DENOMINATOR  OF  ZPTF2  IS  6  (COEFFICIENTS  IN  ASCENDING  ORDER) 

0.  -46.47353837271  213.7325205421  -416.8323061287  442.3612041218  -256.7878801625 
64. 


CP=  7.23 


8.9  Example  9  -  Multirate  Frequency  Response  by  Frequency 
Decomposition 

Problem:  Compute  the  frequency  response  of  the  following  function 

Gt{z )  -  -  V  GTln{zne^kln) 

n  fco 

where  T  =  .24  seconds,  n  =  3,  and  GT/n(zn)  is  the  z  transform  computed  in  Example  8. 


The  ai  ove  function  is  the  frequency  decomposition  method  for  expressing  the  output  transform 
of  a  fast-to-slow  sampler  in  terms  of  the  faster  input  transfer  function.  An  example  of  how  this 
frequency  decomposition  method  can  be  applied  to  the  stability  analysis  of  a  multirate  system  is 
given  in  Example  19  in  Chapter  9. 

The  operator  ZMFRQ  evaluates  the  frequency  response  of  the  above  function  by  using  only  the 
transform  of  the  faster  sampled  signal  GT!n(zn).  The  response  is  computed  by  the  indicated 
summation  with  shifted  values  of  zn.  This  operation  yields  only  the  multirate  frequency  response 
of  GT/n(zn).  No  z  transform  at  the  slower  sampling  rate  is  computed.  In  the  next  example  though, 
an  explicit  form  for  implementing  the  frequency  decomposition  method  is  presented  by  computing 
GT(s)  as  a  rational  function  . 

Since  one  half  of  the  sampling  frequency  of  the  slower  output  sampler  is  13.09  rad/sec,  the  frequency 
range  to  be  used  for  this  example  will  be  from  1.0  to  13.0  rad/sec. 

The  FORTRAN  code  for  this  example  is: 


C 

C 

C 

C 

C 


c 


EXAMPLE  9 

TRANSFER  FUNCTION  IS  ZPTF2  FROM  PREVIOUS  CASE 


ENTER  FREQUENCY  RESPONSE  PARAMETERS  FOR  ZMRFQ 


N0MEGA=2 
0MEGA(1)=1 . 
0MEGA(2)=13 . 
FNIC0=1 
FB0DE=0 
FNYQS=0 
SAMPT= . 24 
NTGER=3 


“number  of  values  of  OMEGA(i)’s  to  be  entered” 
“OMEGA(l )  =  first  frequency  value  to  be  used” 

“OMEG  A(NOMEG  A)=last  frequency  value  to  be  used” 
“.NF..0  to  select  Nichols  plot” 

“.NE.O  to  select  Bode  plot” 

“.NE.O  to  select  Nyquist  plot” 

“sampling  period  of  slower  output  sampler” 

“integer  ratio  of  output /input  sampling  periods” 


PRINT*, 'ZPTF2  IS  AT  THE  FASTER  SAMPLING  RATE,  SAMPT=.08' 


PRINT  *, ’FREQ.  RESP.  WILL  BE  AT  THE  SLOWER  SAMPLING  RATE,  SAMPT=.2 
+4  ’ 

TITLE1  = 

+’ EXAMPLE  9  MULTIRATE  FREQUENCY  RESPONSE  BY  FREQUENCY  DECOMPOSITION 
+ » 
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CALL  ZMRFQ(2)  “compute  multirate  frequency  response  of  ZPTF2” 

C  . 

I _ I 

The  FORTRAN/PRECMP  code  for  this  example  is: 

I - 1 


C  EXAMPLE  9 

C  TRANSFER  FUNCTION  IS  ZPTF2  FROM  PREVIOUS  CASE 
C 

C  ENTER  FREQUENCY  RESPONSE  PARAMETERS  FOR  ZMRFQ 

C 

N0MEGA=2  “number  of  values  of  OMEGA(i)’s  to  be  entered” 

♦OMEGA  1.  13.  !  0MEGA(1)=FIRST  FREQ. ,OMEGA(NOMEGA)=LAST  FREQ. 

FNIC0=1  “.NE.O  to  select  Nichols  plot” 

FBPDE=0  “.NE.O  to  select  Bode  plot” 

FNYQS=0  “.NE.O  to  select  Nyquist  plot” 

SAMPT= .  24  “sampling  period  of  slower  output  sampler” 

PRINT*, ’ZPTF2  IS  AT  THE  FASTER  SAMPLING  RATE,  SAMPT=.08’ 

C  INTEGER  RATIO  OF  OUTPUT/INPUT  SAMPLING  PERIODS  IS  ENTERED 

C  SECOND  ARGUMENT  OF  ZMRFQ ( I, M) 

C 

PRINT* , ’FREQ .  RESP.  WILL  BE  AT  THE  SLOWER  SAMPLING  RATE,  SAMPT=.2 
+4  ' 

TITLE1  = 

+  ’ EXAMPLE  9  MULTIRATE  FREQUENCY  RESPONSE  BY  FREQUENCY  DECOMPOSITION 
+  > 

♦ZMRFQ  2  3  !  COMPUTE  MULTIRATE  FREQUENCY  RESPONSE  OF  ZPTF(2) 

C  . 


I _ J 

The  printer  output  for  this  example  is: 


ZPTF2  IS  AT  THE  FASTER  SAMPLING  RATE,  SAMPT=.08 

FREQ.  RESP.  WILL  BE  AT  THE  SLOWER  SAMPLING  RATE,  SAMPT=.08 

THE  NUMERATOR  ROOTS  OF  ZR00T2  ARE 


NO.  REAL  IMAG.  OMEGA  ZETA 

1  -12.268933  0. 

2  -.67135127E-04  0. 

3  .92311634  0. 

4  -.13469869  0. 

5  -1.1667519  0. 
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LOW 

ORDER  NONZERO 

COEFFICIENT  = 

- . 23106188E-04 

THE 

DENOMINATOR  ROOTS  OF  ZR00T2 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.61284138 

-.73996066 

.96078944 

-.63785191 

2 

.61284138 

.73996066 

.96078944 

-.63785191 

3 

.78662786 

0. 

4 

1.0000000 

0. 

5 

1.0000000 

0. 

6 

0. 

0. 

LOW 

ORDER  NONZERO 

COEFFICIENT  = 

-46.473538 

DEGREE 

OF  NUMERATOR 

OF 

ZPTF2  IS  5 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

-.00002310618764969  -.3443427037531  -2.507846683739  .679417062974  2.464719123011 
. 1950347342841 

DEGREE  OF  DENOMINATOR  OF  ZPTF2  IS  6  (COEFFICIENTS  IN  ASCENDING  ORDER) 

0.  -46.47353837271  213.7325205421  -416.8323061287  442.3612041218  -256.7878801625 
64. 


I************************************************************ 

*  ZMRFQ  -  MULTIRATE  FREQUENCY  RESPONSE  (BY  * 

*  FREQUENCY  DECOMPOSITION  OF  ZPTF2  * 

************************************************************ 

SAMPLING  PERIOD  (SAMPT)  =  .2400 

INTEGER  RATIO  OF  OUTPUT/INPUT  SAMPLING  PERIODS,  NTGER  =  3 


AUTOMATIC  FREQUENCY  MODE  IF  FAUTO.NE.O,  FAUTO  =  1.000 
NOMEGA  =  2.000  OMEGA  *  1.000  ,13.00 


OMEGA 

RAD/SEC 

ZREAL 

ZIHAG 

REAL 

IMAGINARY 

DB 

PHASE 

PHASE 

MARGIN 

1.000 

.997 

.080 

- . 331E+01 

- . 143E+01 

11.125 

-156.66 

23.34 

1.200 

.995 

.096 

- . 247E+01 

-.113E+01 

8.664 

-155.48 

24.52 

1.400 

.994 

.112 

- . 195E+01 

- . 906E+00 

6.648 

-155.08 

24.92 

1.700 

.991 

.136 

- . 147E+01 

- . 670E+00 

4.171 

-155.51 

24.49 

2.000 

.987 

.159 

- . 117E+01 

- . 504E+00 

2.125 

-156.75 

23.25 

2.369 

.982 

.188 

- . 933E+00 

- . 360E+00 

.000 

-158.91 

21.09 

2.869 

.974 

.228 

- . 722E+00 

- . 230E+00 

-2.411 

-162.36 

17.64 
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3.469 

.962 

.274 

- . 560E+00 

- . 132E+00 

-4.805 

-166.75 

13.25 

4.269 

.942 

.335 

- .424E+00 

- . 5S6E-01 

-7.377 

-172.53 

7.47 

5.069 

.919 

.394 

- . 339E+00 

-.  112E-01 

-9.387 

-178.11 

1.89 

5.346 

.910 

.415 

- . 317E+00 

. 458E-07 

-9.966 

-180.00 

.00 

6.946 

.850 

.528 

- . 241E+00 

.467E-01 

-12.206 

-190.98 

-10.98 

8.546 

.775 

.632 

- . 225E+00 

.  989E-01 

-12.202 

-203.76 

-23.76 

9.546 

.722 

.692 

- . 250E+00 

. 181E+00 

-10.213 

-215.89 

-35.89 

10.05 

.694 

.720 

- . 270E+00 

. 286E+00 

-8.096 

-226.62 

-46.62 

10.35 

.677 

.736 

- . 261E+00 

. 409E+00 

-6.287 

-237.50 

-57.50 

10.55 

.665 

.747 

- . 208E+00 

. 530E+00 

-4.893 

-248.60 

-68.60 

10.70 

.656 

.755 

- .  110E+00 

. 630E+00 

-3.887 

-260.08 

-80.08 

i0. 82 

.648 

.762 

. 250E-01 

. 688E+00 

-3.247 

-272.08 

-92.08 

10.92 

.642 

.767 

. 160E+00 

.690E+00 

-2.994 

-283.03 

-103.03 

11.02 

.636 

.772 

. 292E+00 

. 640E+00 

-3.054 

-294.53 

-114.53 

11 . 12 

.630 

.777 

. 393E+00 

. 546E+00 

-3.442 

-305.70 

-125.70 

11.22 

.623 

.782 

.447E+00 

. 435E+00 

-4.097 

-315.81 

-135.81 

11.37 

.614 

.789 

. 458E+00 

. 284E+00 

-5.376 

-328.22 

-148.22 

11.57 

.601 

.799 

.409E+00 

. 150E+00 

-7.222 

-339.91 

-159.91 

11.82 

.585 

.811 

. 335E+00 

.654E-01 

-9.326 

-348.97 

-168.97 

12.12 

.566 

.825 

.270E+00 

. 236E-01 

-11.343 

-355.00 

-175.00 

12.62 

.532 

.847 

.212E+00 

.339E-02 

-13.460 

-359.09 

-179.09 

13.00 

.506 

.862 

. 198E+00 

. 333E-03 

-14.077 

-359.90 

-179.90 
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NICHOLS 

PLOT  (MAGN. 

VS  PHASE) 

09/07/88 

EXAMPLE 

9  MULTIRATE 

FREQUENCY 

RESPONSE  BY  FREQUENCY 

DECOMPOSITION 

20.0 
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18.0 
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16.0 
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* 

I 

10.0 
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I 
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I 
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I 
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The  z  plane  frequencies  in  the  tabulation  of  the  response  are  at  the  faster  sampling  rate.  Note  that 
at  13.0  rad/sec  the  z  plane  frequency  is  at  (.50g  +  j.852)  or  approximately  60  degrees  on  the  unit 
circle.  At  the  slower  sampling  rate  this  point  would  be  at  approximately  the  (-1.  +  j0.)  point, 
which  is  3  times  60  degrees  on  the  unit  circle. 


8.10  Example  10  -  Rational  Representation  of  Frequency  De 
composition  Method 


Problem:  Compute  the  frequency  response  of  the  following  function 

GT(z)  =  -  V  GT/n(zne>2lrk'n) 
n*=o 

by  first  computing  GT(z)  explicitly  as  a  rational  function  in  z.  T=.24  seconds, 
n=3,  and  GT!n{zn )  is  the  z  transform  computed  in  Example  8. 


In  Example  9  the  frequency  response  was  computed  using  the  command  ZMRFQ  which  numerically 
evaluated  the  function  over  a  range  of  frequencies  for  z.  In  this  example  a  different  approach  is 
taken.  First,  GT(z)  is  computed  as  a  rational  function  using  the  the  command  ZMRXFM.  Then 
the  frequency  response  of  GT(z )  is  computed  using  the  command  ZFREQ.  The  method  used  to 
compute  the  rational  representation  of  the  frequency  decomposition  method  may  be  inaccurate  for 
higher  order  transfer  functions.  To  check  the  accuracy,  the  frequency  response  of  the  resulting 
transform  can  be  evaluated  and  compared  with  the  frequency  response  computed  by  the  command 
ZMRFQ.  An  example  of  how  this  frequency  decomposition  method  can  be  applied  to  the  stability 
analysis  of  a  multirate  system  is  given  in  Example  19  of  Chapter  9. 

The  FORTRAN  code  for  this  example  is: 

I - 1 

C  EXAMPLE  10 

C  G(Z)  IS  ZPTF2  FROM  THE  PREVIOUS  EXAMPLE 

C 

C  ENTER  PARAMETERS  FOR  ZMRXFM 

C 

SAMPT=.24  “sampling  period  of  slower  output  sampler” 

NTGER=3  “integer  ratio  of  output /input  sampling  periods” 

PRINT  * , ’ ZPTF2  IS  AT  THE  FASTER  SAMPLING  RATE,  SAMPT=.08’ 

PRINT  *, ’ZPTF3  WILL  BE  AT  THE  SLOWER  SAMPLING  RATE,  SAMPT  =.24’ 

CALL  ZMRXFM(3,2)  “compute  multirate  transform  of  ZPTF2  and  store  in  SPTF3” 

C  . 

C  ZPTF3  IS  AT  THE  SLOWER  SAMPLING  RATE 

C 

C  ENTER  FREQUENCY  RESPONSE  PARAMETERS  FOR  USE  WITH  ZFREQ 

C 

NQMEGA=2  “number  of  values  of  OMEGA  to  be  entered” 

0MEGA(1)  =  1.  “OMEG A(l)=first  frequency  value  to  be  used” 

0MEGA(2)  =  13.  “OMEGA(NOMEGA)=last  frequency  value  to  be  used” 

TITLE1  = 

+’ EXAMPLE  10  RATIONAL  REPRESENTATION  OF  FREQUENCY  DECOMPOSITION  MET 
+H0D  ’ 

CALL  ZFREQ (3) 

C  . 
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The  FORTRAN/PRECMP  code  for  this  example  is: 


C  EXAMPLE  10 

C  G(Z)  IS  ZPTF2  FROM  THE  PREVIOUS  EXAMPLE 

C 

C  ENTER  PARAMETERS  FOR  ZMRXFM 

C 

SAMPT=.24  “sampling  period  of  slower  output  sampler” 

NTGER=3  “integer  ratio  of  output/input  sampling  periods” 

PRINT  * , ’ ZPTF2  IS  AT  THE  FASTER  SAMPLING  RATE,  SAMPT=.08> 

PRINT  ♦,>ZPTF3  WILL  BE  AT  THE  SLOWER  SAMPLING  RATE,  SAMPT  =.24’ 
♦ZMRXFM  3  2  !  COMPUTE  MULTIRATE  TRANSFORM  OF  ZPTF(2),  STORE  IN  ZPTF(3) 
C  .  .....  . 

C  ZPTF3  IS  AT  THE  SLOWER  SAMPLING  RATE 

C 

C  ENTER  FREQUENCY  RESPONSE  PARAMETERS  FOR  USE  WITH  ZFREQ 
C 


N0MEGA=2  “number  of  valu  of  OMEGA  to  be  entered” 

•OMEGA  1  !  0MEGA(1)=FIRST  FREQ.,  OMEGA (NOHEGA)=LAST  FREQ. 

TITLE1  = 

’  EXAMPLE  10  RATIONAL  REPRESENTATION  OF  FREQUENCY  DECOMPOSITION  MET 


+H0D  ’ 
♦ZFREQ  3  \ 
C  .  . 


COMPUTE  FREQUENCY  RESPONSE  OF  ZPTF(3) 


The  printer  output  for  this  example  is: 

I - 


ZPTF2  IS  AT  THE  FASTER  SAMPLING  RATE,  SAMPT=.08 
ZPTF3  WILL  BE  AT  THE  SLOWER  SAMPLING  RATE,  SAMPT=.24 

THE  NUMERATOR  ROOTS  OF  ZR00T2  ARE 


NO.  REAL  IMAG.  OMEGA  ZETA 

1  -12.268933  0. 

2  - .67135127E-04  0. 

3  .92311634  0. 

4  -.13469859  0. 

5  -1.1567519  0. 


LOW  ORDER  NONZERO  COEFFICIENT  =  - . 23106188E-04 


THE  DENOMINATOR  ROOTS  OF  ZR00T2  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.61284138 

-.73996066 

.96078944 

-.63785191 

2 

.61284138 

.73996066 

.96078944 

-.63785191 

3 

.78662786 

0. 

4 

1.0000000 

0. 

5 

1.0000000 

0. 

6 

0. 

0. 

LOW  ORDER  NONZERO 

COEFFICIENT  = 

-46.473538 

DEGREE 

OF  NUMERATOR 

OF  ZPTF2  IS  5 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

- .  00002310618764969 

-.3443427037531  - 

2.507846683739  . 

679417062974  2.464719123011 

.1950347342841 

DEGREE  OF  DENOMINATOR  OF  ZPTF2  IS  6  (COEFFICIENTS  IN  ASCENDING  ORDER) 

0.  -46.47353837271  213.7325205421  -416.8323061287  442.3612041218  -256.7878801625 
64. 


444***4444444*4444444444444444444*4444444444444 

*  ZR00T3  -  ZMRIFM  OF  ZR00T2  * 

4********************************************** 


4444*444444*4444444444444*444444444444444444444 

*  ZPTF3  =PSYNTH(ZR00T3  )  * 

*44444*4444444*44444444*4444*44*44444444*444444 


THE  NUMERATOR  ROOTS  OF  ZR00T3  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

- . 10647750E 

-01 

0. 

2 

-.69161620 

0. 

3 

.78658382 

0. 

4 

-2.9655282 

0. 

LOW 

ORDER  NONZERO 

COEFFICIENT  = 

-.18162533 

the 

DENOMINATOR  ROOTS  OF  ZR00T3 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-.77650116 

-.42857182 

.88692044 

.87550262 

2 

-.77650116 

.42857182 

.88692044 

.87550262 

3 

.48675226 

0. 

4 

1.0000000 

0. 

5 


1.0000000 


0. 


LOW  ORDER  NONZERO  COEFFICIENT  =  -24.505145 

DEGREE  OF  NUMERATOR  OF  ZPTF3  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 
-.1816253320693  -17.19496629438  -12.53387821719  34.37676333063  12.36036972677 

DEGREE  OF  DENOMINATOR  OF  ZPTF3  IS  5  (COEFFICIENTS  IN  ASCENDING  ORDER) 
-24.50514470241  50.97511989617  39.80519865903  -70.51517819695  -59.75999565584 
64. 


CP=  7.41 

************************************************************ 

*  ZFREQ  -  FREQUENCY  RESPONSE  OF  Z-PLANE  TRANSFER  * 

*  FUNCTION  3  * 

************************************************************ 

SAMPLING  PERIOD  (SAMPT)  =  .2400 


AUTOMATIC 

FREQUENCY  MODE 

IF  FAUTO.NE. 

.0,  FAUTO  = 

1.000 

NOMEGA  =  2 

.000  OMEGA  = 

1.000 

13.00 

OMEGA 

ZREAL 

ZIMAG 

REAL 

IMAGINARY 

DB 

PHASE 

PHASE 

RAD/SEC 

MARGIN 

1.000 

.971 

.238 

- . 331E+01 

- .  143E+01 

11.125 

-156.66 

23.34 

1.200 

.959 

.284 

- . 247E+01 

- . 113E+01 

8.664 

-155.48 

24.52 

1.400 

.944 

.330 

- . 195E+01 

- . 906E+00 

6.648 

-155.08 

24.92 

1.700 

.918 

.397 

- . 147E+01 

- . 670E+00 

4.171 

-155.51 

24.49 

2.000 

.887 

.462 

- . 117E+01 

- . 504E+00 

2.125 

-156.75 

23.25 

2.369 

.843 

.538 

- . 933E+00 

- . 360E+00 

.000 

-158.91 

21.09 

2.869 

.772 

.635 

- . 722E+00 

- . 230E+00 

-2.411 

-162.36 

17.64 

3.469 

.673 

.740 

- . 560E+00 

-. 132E+00 

-4.805 

-166.75 

13.25 

4.269 

.519 

.854 

- . 424E+00 

- .556E-01 

-7.377 

-172.53 

7.47 

5.069 

.347 

.938 

- . 339E+00 

- .  112E-01 

-9.387 

-178.11 

1.89 

5.346 

.284 

.959 

- . 317E+00 

. 458E-07 

-9.966 

-180.00 

.00 

6.946 

-.096 

.995 

- . 241E+00 

. 467E-01 

-12.206 

-190.98 

-10.98 

8.546 

-.462 

.887 

- .225E+00 

. 989E-01 

-12.202 

-203.76 

-23.76 

9.546 

-.660 

.752 

- . 250E+00 

. 181E+00 

-10.213 

-215.89 

-35.89 

10.06 

-.745 

.667 

- . 270E+00 

. 286E+00 

-8.096 

-226.62 

-46.62 

10.35 

-.791 

.612 

- .261E+00 

. 409E+00 

-6.287 

-237.50 

-57.50 

10.55 

-.819 

.573 

- . 208E+00 

. 530E+00 

-4.893 

-248.60 

-68.60 

10.70 

-.839 

.544 

- . 110E+00 

. 630E+00 

-3.887 

-260.08 

-80.08 

10.82 

-.855 

.518 

. 250E-01 

. 688E+00 

-3.247 

-272.08 

-92.08 

10.92 

-.868 

.497 

. 160E+00 

. 690E+00 

-2.994 

-283.03 

-103.03 

11.02 

-  .879 

.476 

. 292E+00 

. 640E+00 

-3.054 

-294.53 

-114.53 

11.12 

-.890 

.455 

. 393E+00 

. 546E+00 

-3.442 

-305.70 

-125.70 

11.22 

-.901 

.434 

. 447E+00 

. 435E+00 

-4.097 

-315.81 

-135.81 
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11.37 

-.916 

.401 

. 458E+00 

.  284E+00 

-5.376 

-328.22 

-148.22 

11.57 

-.934 

.357 

. 409E+00 

. 150E+00 

-7.222 

-339.91 

-159.91 

11.82 

-.954 

.300 

. 335E+00 

. 654E-01 

-9.326 

-348.97 

-168.97 

12.12 

-.973 

.231 

. 270E+00 

. 236E-01 

-11.343 

-355.00 

-175.00 

12.62 

-.994 

.112 

. 212E+00 

. 339E-02 

-13.460 

-359.09 

-179.09 

13.00 

-1.000 

.022 

. 198E+00 

. 333E-03 

-14.077 

-359.90 

-179.90 

NICHOLS  PLOT  (MAGN.  VS  PHASE)  09/07/88 

EXAMPLE  10  RATIONAL  REPRESENTATION  OF  FREQUENCY  DECOMPOSITION  METHOD 


20.0 

19.0 

18.0 

17.0 

16.0 

15.0 

14.0 

13.0 

12.0 

11.0 

10.0 

9.00 

8.00 

7.00 

6.00 

5.00 

4.00 

3.00 

2.00 

1.00 

0. 

-1.00 

-2.00 

-3.00 

-4.00 

-5.00 

-6.00 

-7.00 

-8.00 

-9.00 

-10.0 

-11.0 

-12.0 

-13.0 

-14.0 

-15.0 

-16.0 

-17.0 

-18.0 

-19.0 

-20.0 

-21.0 

-22.0 


******* 

***  ** 

**  ** 

* 

* 

* 


** 

** 

* 


* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

■* 
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* 

* 


* 

* 

* 

* 

* 


* 

* 

* 

* 


* 

* 


*  * 

*  * 

*  ** 

***** 

* 


IIIIIIIII 
-360.000  -288.000  -216.000  -144.000  -72.000 


I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 
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I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I 

I  I 

.000 
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Note  that  the  frequency  response  is  identical  to  the  response  computed  in  Example  9.  In  the 
tabulation  of  the  response,  the  z-plane  frequencies  are  at  the  slower  sampling  rate. 


8.11  Example  11  -  Transfer  Function  Evaluation  by  Cramer’s 
Method 


Problem:  Given 


»  5  +  2  -(s  +  3) 

~  0  .01s2  +  .15s  +  1 

B(s)  -  [0, 1]T  and  y(s)  =  fy,(s),  y2(5)]T 

find  the  transfer  function  from  u  to  j/j  by  application  of  Cramer’s  method. 


If,  s  _  det  Miis) 

[  1  u(s)  det  M(s) 


where  Mi(s)  is  equal  to  M(s)  with  column  1  replaced  by  B(s). 

Three  steps  are  required  for  this  example.  The  first  two  steps  compute  the  determinants  and  store 
the  results  in  polynomials  and  the  last  step  copies  the  polynomials  into  an  s  plane  transfer  function. 

The  FORTRAN  code  for  this  example  is: 

I - 1 


C  EXAMPLE  11 

C  ENTER  PARAMETERS  FOR  DIMENSION  AND  DEGREE  OF  MATRIX 

C 

MXM=2  “dimension  of  matrices” 

MDEG=2  “highest  degree  of  polynomial  elements” 

C  ENTER  MATRIX  DATA  FOR  COEFFICIENTS  OF  S**0 
M0(1 , 1)=2 
M0(l,2)=-3 
M0(2 ,2)=1 

C  ENTER  MATRIX  DATA  FOR  COEFFICIENTS  OF  S**l 

Ml(l,l)=l 
Ml(l,2)=-1 
Hl(2,2)=. 15 

C  ENTER  MATRIX  DATA  FOR  COEFFICIENTS  OF  S**2 
M2(2,2)=.01 
C  ENTER  B  VECTOR 

B0(2)=l . 

C  COMPUTE  DETERMINANT  OF  THE  DENOMINATOR  OF  H(S) 

PRINT  *. 'DETERMINANT  OF  DENOMINATOR  WILL  BE  IN  P0LY2  AND’ 
PRINT  * , ’R00T2’ 
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c 

c 

c 


c 

c 

c 

c 

c 


CALL  DTERM(2,0) 


“compute  determinant  of  M(s),  if  second  argument 


is  zero,  no  column  substitution  is  made 


n 


COMPUTE  DETERMINANT  OF  THE  NUMERATOR  OF  H(S) 

PRINT*. ’DETERMINANT  OF  NUMERATOR  WILL  BE  IN  P0LY3  AND  R00T3’ 

CALL  DTERM(3,1)  “compute  determinant  of  Mi (s),  second  argument 

is  column  number  where  B(s)  is  substituted” 


COPY  POLYNOMIALS  TO  FORM  S  PLANE  TRANSFER  FUNCTION 
CALL  CPYPS(13,3,2) 


| _ 1 

The  printer  output  for  this  example  is: 


DETERMINANT  OF  DENOMINATOR  WILL  BE  IN  P0LY2  AND 
R00T2 

MATRIX  M(S)  IS 


0 

1 

2 

ROW 

COL 

s 

S 

S 

1 

1 

. 20000000E+01 

. lOOOOOOOE+Ol 

1 

2 

- . 30000000E+01 

- . lOOOOOOOE+Ol 

2 

2 

.  lOOOOOOOE+Ol 

. 15000000E+00 

.  lOOOOOOOE-Ol 

B  VECTOR  IS 

0 

1 

2  3 

ROW 

S 

s 

S  S 

2  2  . 10000000E+01 


************************************************************ 

*  DTERM  -  FIND  DETERMINANT  OF  MATRIX  * 

*  WITH  NO  COLUMN  REPLACED  BY  B  VECTOR  * 

************************************************************ 


************************************************************ 
*  R00T2  =  ROOTS  OF  DETERMINANT  * 

************************************************************ 


THE  ROOTS  OF  R00T2  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-7.S000000 

6.6143783 

10.000000 

.75000000 

2 

-7.5000000 

-6.6143783 

10.000000 

.75000000 

3 

-2.0000000 

0. 

LOW  ORDER  NONZERO 

COEFFICIENT  = 

2.0000000 

************************************************************ 
*  P0LY2  =  COEFFICIENTS  OF  DETERMINANT  POLYNOMIAL  * 

************************************************************ 


DEGREE  OF  P0LY2  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

2.  1.3  .17  .01 


DETERMINANT 

OF  NUMERATOR  WILL 

BE  IN  P0LY3  AND 

R00T3 

MATRIX  M(S) 

IS 

0 

1 

2 

ROW  COL 

S 

S 

S 

1  1 

. 20000000E+01 

. 10000000E+01 

1  2 

- . 30000000E+01 

- . 10000000E+01 

2  2 

. 10000000E+01 

. 15000000E+00 

. 10000000E-01 

B  VECTOR  IS 

0 

1 

2 

ROW 

s 

S 

S 

2  2  . 10000000E+01 


************************************************************ 

*  DTERH  -  FIND  DETERMINANT  OF  MATRIX  * 

*  WITH  COLUMN  1  REPLACED  BY  B  VECTOR  * 

************************************************************ 


************************************************************ 
*  R00T3  =  ROOTS  OF  DETERMINANT  * 

************************************************************ 


NO. 

1 


THE  ROOTS  OF  R00T3  ARE 

REAL  IMAG.  OMEGA  ZETA 

-3.0000000  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  3.0000000 
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************************************************************ 

*  P0LY3  =  COEFFICIEHTS  OF  DETERMINANT  POLYNOMIAL  * 

************************************************************ 

DEGREE  OF  P0LY3  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 

3.  1. 

THE  ROOTS  OF  ROOT3  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -3.0000000  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  3.0000000 

DEGREE  OF  P0LY3  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 

3.  1. 

THE  ROOTS  OF  R00T2  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -7.5000000  6.6143783  10.000000  .75000000 

2  -7.5000000  -6.6143783  10.000000  .75000000 

3  -2.0000000  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  2.0000000 

DEGREE  OF  P0LY2  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

2.  1.3  .17  .01 

*********************************************** 

*  SR00T13  =  R00T3  /  R00T2  * 

*********************************************** 

*********************************************** 

*  SPTF13  =  P0LY3  /  P0LY2  * 

*********************************************** 

THE  NUMERATOR  ROOTS  OF  SR00T13  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -3.0000000  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  3.0000000 
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THE  DENOMINATOR  ROOTS  OF  SR00T13  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-7.5000000 

6.6143783 

10.000000 

.75000000 

2 

-7 . SoOOOOO 

-C. 6143/ 83 

iO. 000000 

.75000000 

3 

-2.0000000 

0. 

LOW  ORDER  NONZERO 

COEFFICIENT  = 

2.0000000 

DEGREE  OF  NUMERATOR  OF  SPTF13  IS  1  (COEFFICIENTS  IN  ASCENDING  ORDER) 
3.  1. 

DEGREE  OF  DENOMINATOR  OF  SPTF13  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 
2.  1.3  .17  .01 

BODE  GAIN  =  1.5000000 


CP=  7 . 55 


8.12  Example  12  -  Save  Data  From  Batch  Job 


Problem:  Save  all  POLY;,  SPTF;,  ZPTF;,  WPTFj,  and  matrix  data  (used  by  DTERM  and 
DETRM)  so  that  it  can  be  used  in  a  subsequent  batch  or  interactive  LCAP2  job.  Assume 
that  Examples  1  through  11  were  all  run  on  the  same  batch  job. 

The  command  SAVE  will  save  all  pertinent  data  (except  for  the  transfer  connection  data1)  from 
a  current  job  so  that  on  subsequent  batch  or  interactive  jobs  this  data  can  be  reloaded  with  the 
LOAD  command.  The  data  will  be  written  to  a  local  file  specified  by  the  first  argument  of  the 
SAVE  command.  Upon  completion  of  the  batch  job  this  file  must  be  SAVEed  on  the  CRAY  or 
CATALOGed  on  the  CDC. 

To  label  the  data  to  be  stored,  the  contents  of  the  character  variable  STRLBL  in  common  block 
HEAD  is  written  to  the  file. 

The  FORTRAN  code  for  this  example  is: 

r  I 

C  EXAMPLE  12 
C 

C  SUBROUTINE  SAVE  BELOW  WILL  SAVE  ALL  TRANSFER  FUNCTIONS, 

C  POLYNOMIALS,  AND  MATRIX  ELEMENTS  INTO  A  LOCAL  FILE  SPECIFIED 
C  BY  THE  FIRST  ARGUMENT  OF  THE  SUBROUTINE.  A  NON  ZERO  VALUE. 

C  FOR  THE  SECOND  ARGUMENT  WILL  PRINT  OUT  ALL  THE  DATA  SAVED. 

'See  Reference  for  commands  BlSAVE  and  B2SAVE. 
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C  THE  CONTESTS  OF  THE  CHARACTER  VARIABLE  SAVLBL  (IN  COMMON/HEAD/) 

C  WILL  BE  SAVE  IN  THE  FILE  AND  BE  PRINTED  OUT  WHEN  THE  FILE  IS 

C  LOADED  IN  A  SUBSEQUENT  JOB. 

C 

SAVLBL  = 

-r  ’EXAMPLES  FCR  BATCH  LCAP2  USERS  MANUAL  * 

C 

CALL  SAVE( 'SAVDATA1 ,1)  “first  argument  is  the  file  name 

if  second  argument  is  0  printout  will  be  suppressed” 


L 


J 


The  printer  output  for  this  example  is2: 

f 

************************************************************ 

*  SAVE  -  SAVE  ALL  CURRENT  DATA  (POLYNOMIAL,  TRANSPER  * 

*  FUNCTION,  MATRIX,  LCAP2  PARAMETERS),  EXCEPT  * 

*  FOR  TRANSFER  FUNCTION  CONNECTION  DATA  * 

************************************************************ 


LABEL  FOR  FILE  STRDATA  IS 

EXAMPLES  FOR  BATCH  LCAP2  USERS  MANUAL 

DEGREE  OF  NUMERATOR  OF  SPTF1  IS  0  (COEFFICIENTS  IN  ASCENDING  ORDER) 
25 . 

DEGREE  OF  DENOMINATOR  OF  SPTF1  IS  2  (COEFFICIENTS  IN  ASCENDING  ORDER) 
25.  5.  1. 


BODE  GAIN  =  1.0000000 

THE  NUMERATOR  ROOTS  OF  SR00T2  ARE 
NO.  REAL  IMAG.  OMEGA  ZETA 

1  -10.000000  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  30.000000 

THE  DENOMINATOR  ROOTS  OF  SR00T2  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 


’Since  the  output  from  Examples  1  through  11  has  been  listed  already,  only  portions  of  the  output  generated  by 
this  example  will  be  shown. 
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1 

-1.0000000 

2.0000000 

2.2360680 

.44721360 

2 

-1.0000000 

-2.0000000 

2.2360680 

.44721360 

3 

-7.0000000 

0. 

4 

0. 

0. 

LOU  ORDER  NONZERO 

COEFFICIENT  = 

70.00C000 

DEGREE 

OF  NUMERATOR 

OF  SPTF2  IS  1 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

30.  3. 

DEGREE  OF  DENOMINATOR  OF  SPTF2  IS  4  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  70.  38.  18.  2. 

BODE  GAIN  =  .42857143 


(data  for  SPTF;,  i  =  3, ...) 


(data  for  WPTF;,  i  =  1,2, ...) 
(data  for  WPTF^,  t  =  1, 2, ...) 
(data  for  POLY{,  t  =  1, 2, ...) 


MATRIX  M(S)  IS 

ROW  COL 

1  1 

12 
2  2 


0 

s 

.  20000000E+01 
.  30000000E+01 
.  10000000E+01 


1 

s 

. 10000000E+01 
. 10000000E+01 
. 15000000E+00 


2 

S 


10000000E-01 


B  VECTOR  IS 

0 


2 


3 


ROW 


S 


S 


s 


s 


2  2  . 10000000E+01 


Upon  exit  from  batch  LCAP2,  the  local  file  name  “SAVDATA”  created  by  the  SAVE  command 
must  be  (1)  SAVEd  if  the  CRAY  is  used  or  (2)  CATALOGed  if  the  CDC  is  used.  One  of  the 
following  statements  is  to  be  used. 
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SAVE, DN=SAVDATA , PDN=CBUSERDATA , 0WN=9487 .  “for  CRAY” 

CATALOG ,  SAVDATA ,  8BBUSERDATA ,  ID=9487 .  “FOR  MFB  CDC” 

CATALOG , SAVDATA , 8XBUSERDATA , ID=9487 , ST=PF6 .  “for  MFX  CDC,  (file  is  saved  on  MFB)” 


8.13  Example  13  -  Load  Data  Saved  From  Example  12 


Problem:  Load  data  saved  from  Example  12 

The  command  LOAD  will  load  POLY;,  SPTF;,  ZPTF;,  WPTF;,  and  matrix  data  from  a  local 
file.  Before  using  this  command,  the  local  file  must  be  (1)  ACCESSed  (CRAY)  or  (2)  ATTACHed 
(CDC)  before  batch  LCAP2  is  executed.  This  is  done  by  one  of  the  following  statements: 


ACCESS ,  DN=OLDDATA ,  PDN=CBUSERDATA ,  0WN=9487 .  “for  CRAY” 
ATTACH ( OLDDATA ,  8BBUSERDATA ,  ID=9487 )  “for  MFB  CDC” 

ATTACH ( OLDDATA ,  3XBU5ERDATA ,  ID=9487 ,  ST=PF 6 )  “for  MFX  CDC” 


The  FORTRAN  code  for  this  example  is: 

I - 1 

C  LOAD  DATA  SAVED  IN  EXAMPLE  12 

C 

CALL  LOAD (  ’OLDDATA*  ,1)  “first  argument  is  the  file  name” 

“if  second  argument  is  0  printout  will  be  suppressed” 


I _ I 

The  printer  output  for  this  example  is1: 

r  i 

************************************************************ 

*  LOAD  -  LOAD  POLYNOMIAL,  TRANSFER  FUNCTION,  MATRIX,  * 

*  LCAP2  PARAMETERS  (BUT  NOT  TRANSFER  * 

*  FUNCTION  CONNECTION  DATA)  FROM  A  FILE  * 

************************************************************ 


LABEL  FOR  FILE  STRDATA  IS 

EXAMPLES  FOR  BATCH  LCAP2  USERS  MANUAL 

DEGREE  OF  NUMERATOR  OF  SPTF1  IS  0  (COEFFICIENTS  IN  ASCENDING  ORDER) 
25. 


!Only  the  first  part  of  the  printout  is  shown.  Note  that  the  labeling  information  entered  with  the  character 
variable  SAVLBL  in  Example  12  is  printed  out. 
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DEGREE  OF  DENOMINATOR  OF  SPTF1  IS  2  (COEFFICIENTS  IN  ASCENDING  ORDER) 
25.  5.  1. 

BODE  GAIN  =  1.0000000 

THE  NUMERATOR  ROOTS  OF  SPt00T2  ARE 
NO.  REAL  IMAG.  OMEGA  ZETA 

1  -10.000000  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  30.000000 

THE  DENOMINATOR  ROOTS  OF  SR00T2  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -1.0000000  2.0000000  2.2360680  .44721360 

2  -1.0000000  -2.0000000  2.2360680  .44721360 

3  -7.0000000  0. 

4  0.  0. 

LOW  ORDER  NONZERO  COEFFICIENT  =  70.000000 
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Chapter  9 


Advanced  Examples 


Examples  are  presented  in  this  chapter  to  demonstrate  some  of  the  different  methods  available  in 
LCAP2  for  solving  complex  problems.  Examples  14  and  15  describe  two  related  methods  which 
can  be  used  to  model  a  complex  continuous  system  represented  by  a  set  of  Laplace  transformed 
differential  equations.  Most  of  the  stability  analysis  for  launch  vehicles  at  Aerospace  have  been 
formulated  using  these  two  methods.  Example  16  describes  two  methods  for  computing  the  fre¬ 
quency  response  of  a  nonrational  function.  The  use  of  a  user  defined  function  is  presented  for  the 
generalized  s  plane  frequency  response  command,  FREQS. 

Example  17  is  the  solution  of  the  IEEE  CACSD  Benchmark  [4]  simple  continuous  model  using  the 
automated  method  based  on  connection  of  transfer  function  blocks.  Examples  18  through  21  are 
solutions  of  the  IEEE  CACSD  Benchmark  Problem  No.  3  [5]  multi-rate  sampled  data  autopilots. 
Example  18  is  the  solution  of  the  2-rate  model  using  the  automated  method  based  on  connection  of 
transfer  function  blocks  while  Example  19  is  the  same  solution  using  classical  transform  methods 
Examples  20  and  21  are  analogous  solutions  for  the  4-rate  model.  The  complete  setup  for  these 
two  problems  is  given  in  the  examples.  However,  since  the  output  for  these  two  examples  will  be 
very  long,  only  selected  output  will  be  given  in  this  manual.  While  only  a  single  printout  of  a  set 
of  transfer  function  roots  is  sufficient  to  explain  the  output  of  a  BlTF  or  B2TF  command,  the 
complete  solution  for  these  benchmark  problems  will  be  presented  since  these  examples  will  also 
serve  to  benchmark  the  LCAP2  program. 

The  use  of  classical  transform  methods  in  Examples  19  and  21  are  presented  as  an  alternate  method 
for  solving  the  multirate  problems.  Unlike  the  method  used  in  Example  18  and  20,  whicn  is  com¬ 
pletely  automated  so  that  the  analyst  with  very  little  experience  in  multirate  theory  can  easily  set 
up  an  analysis,  the  classical  transform  method  is  more  involved  and  requires  a  basic  understanding 
of  multirate  relationships  in  the  frequency  domain.  Example  19  presents  a  review  of  two  basic  z 
plane  multirate  relationships  and  shows  how  the  SZXFM  and  ZMRXFM  commands  are  used.  This 
block  diagram  reduction  method  provides  some  insight  to  the  problem  not  offered  by  the  automated 
method  of  analysis  which  is  based  on  the  Kalman-Bertram  state  space  method.  In  Example  21  the 
same  type  of  multirate  operations  are  used,  except  that,  for  computional  reasons,  the  analysis  is 
performed  in  the  w  plane  instead. 

Examples  17  through  21  can  be  reproduced  by  the  user  by  executing  any  of  the  following  files  which 
are  saved  as  indirect  files  on  CDC  MFB.  A  copy  of  an  indirect  file  can  be  obtained  by  typing  the 
following  command  in  INTERCOM: 
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IGET.f ile_name/PF=ZL2USER, ID=9487 


where  lile_name  and  its  description  is  given  in  Table  9.1. 


Table  9.1:  Decks  for  Creation  of  Examples  17-21 


Files  For  Reproducing  Examples  16  -  19 

file_name 

Description 

CEX17 

For  CRAY,  Example  17 

CEX18 

For  CRAY,  Example  18 

CEX19 

For  CRAY,  Example  19 

CEX20 

For  CRAY,  Example  20 

CEX21 

For  CRAY.,  Example  21 

BEX17 

For  CDC  MFB,  Example  17 

BEX18 

For  CDC  MFB,  Example  18 

BEX19 

For  CDC  MFB,  Example  19 

BEX20 

For  CDC  MFB,  Example  20 

XEX17 

For  CDC  MFX,  Example  17 

XEX18 

For  CDC  MFX,  Example  18 

XEX19 

For  CDC  MFX,  Example  19 

XEX20 

For  CDC  MFX,  Example  20 

To  execute  a  CRAY  job,  type: 

CSUBMIT,  filename. 
To  execute  a  CDC  job,  type: 


BATCH , f il«  mama , IIPUT . 


9.1  Example  14  -  Modeling  a  System  as  a  Matrix  of  Laplace 
Transformed  Differential  Equations 


Problem:  Model  the  following  system  as  a  matrix  of  Laplace  transformed  differential  equations  and 
then  compute  the  closed  loop  transfer  function  0/u  end  the  open  loop  transfer  function 
v/u  by  using  Cramer’s  method. 


Figure  9.1:  Continuous  System  with  Plant  Represented  by  a  Set  of  Equations 

This  example  illustrates  a  method  of  analysis  for  a  continuous  system  which  is  not  completely 
modeled  as  a  connection  of  transfer  function  blocks.  It  is  representative  of  complex  systems  such 
as  launch  vehicles  in  which  the  explicit  evaluation  of  plant  transfer  functions  (i.e,  0/6  and  0/6  for 
this  example)  is  computationally  not  the  best  procedure  to  use1  for  stability  analysis.  If  plant 
transfer  functions  were  computed  so  that  either  the  (l)  block  diagram  reduction  method  or  the 
(2)  automated  analysis  method  using  transfer  function  connection  blocks  was  used  to  evaluate  the 
desired  open  and  closed  loop  transfer  functions,  the  common  denominator  roots  of  the  plant  transfer 
functions  will  introduce  redundant  states  (roots)  to  the  analysis  model  of  the  system.  When  both 
the  number  of  plant  outputs  and  the  order  of  the  plant  transfer  functions  are  small,  the  number 
of  redundant  roots  will  be  small  and  will  generally  not  present  a  problem  for  LCAP2.  However,  if 
there  is  more  than  one  plant  output  and  the  order  of  the  plant  transfer  functions  is  not  small,  the 
number  of  redundant  roots  will  be  excessive.  Computationally,  the  additional  redundant  roots  will 
require  more  execution  time  and  may  lead  to  less  accurate  results.  Also  if  the  number  of  redundant 
roots  is  very  large,  the  size  of  the  model  may  be  too  large  for  LCAP2  to  analyze.  For  this  type  of 
problem,  the  system  is  best  modeled  by  a  set  of  Laplace  transformed  differential  equations. 

Although  the  plant  for  this  example  is  low  order  and  transfer  functions  0/6  and  0/6  can  be  computed 
explicitly  so  that  the  block  diagram  reduction  method  can  be  used  instead,  this  low  order  example 
is  used  only  to  demonstrate  the  techniques  of  this  matrix  method  of  analysis. 


'Except  for  checking  out  the  modeling  of  the  plant  dynamics. 
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For  stability  analysis  the  loop  is  broken  after  the  summation  of  the  feedback  loop.  Define  a  flag 
KFLG,  whose  value  is  to  be  0  or  1,  which  will  be  used  to  open  or  close  this  feedback  loop.  The 
above  figure  is  redrawn  with  this  flag  to  obtain  Figure  9.2. 


Figure  9.2:  Figure  9.1  Redrawn  with  KFLG 


The  set  of  Laplace  transformed  equations  for  this  figure 


(s2  +  Es  +  F)6 
(Jxs)xi 
(a2  -f  As  +  B)x2 

e 

30 

(a  -f  G)x3 
(s  +  H)x4 
v 


( Cs  +  D)(u-  KFLG  *  v) 

6 

KS 

Xi  +  x2 

0 

Kj 

K20 

X3  +  X4 


The  matrix  form  of  these  equations  is 

M(s)y(s)  =  B(s)w 

where  y(s),  M(s),  and  B(s)  are  given  by 

y(s)  =  xi,  x2, 9, 9 ,  x3,  x4,  rj 
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s2  +  Es  +  F 

0 

0 

0 

0 

0 

0 

KFLG  *  {Cs  D) 

-1 

Ixs 

0 

0 

0 

0 

0 

0 

-K 

0 

s2  +  As  +  B 

0 

0 

0 

0 

0 

0 

-1 

-1 

1 

0 

0 

0 

0 

0 

0 

0 

-1 

1 

0 

0 

0 

0 

0 

0 

-Kx 

0 

s  -j-  G 

0 

0 

0 

0 

0 

0 

-k2 

0 

a  +  H 

0 

0 

0 

0 

0 

0 

-1 

-1 

1 

B(s)  =  [(Cs 

+  D),  0, 

,  0, 0, 0, 

0,0,  of 

The  closed  loop  transfer  function  0{s)/u{s)  is  given  by 

0(s)  _  det  M5(s) 
u(a)  det  M(s) 

where  Ms(s)1  is  defined  to  be  equal  to  M(s)  with  column  5  replaced  by  B(s)  and  the  value  of 
KFLG  is  set  to  1. 

The  open  loop  transfer  function  v(s)/u(s)  is  given  by 

v(s)  _  det  M8(s) 
u(s)  det  M(s) 


where  the  value  of  KFLG  set  '  j  0. 

To  use  LCAP2  to  evaluate  the  above  transfer  functions,  the  polynomial  matrix  M(s)  is  represented 
by  the  input  matrices  MO,  Ml,  M2,  M3,  and  M4  as 


M(a)  =  M4  s4  +  M3  a3  +  M2  a2  +  Ml  a  +  MO 
and  the  input  vector  B(s)  is  represented  by  the  input  vectors  BO,  Bl,  B2,  B3,  and  B4  as 

B (s)  =  B4  s*  +  B3  a3  +  B2  s2  +  Bl  s  +  BO 

The  FORTRAN  code  for  this  example  is: 


C  ESTER  PARAMETERS  FOR  ORDER  AHD  DEGREE  OF  MATRIX 
C 

MXM=8  “order  of  matrix” 

MDEG=2  “highest  degree  of  polynomial  element” 


‘By  definition,  Mo(t)  =  M(«) 


c 

C  ENTER  DATA 

A= . 

B= . 

C= . 

D= . 

E= . 

F= . 

G= . 

H= . 

RK= .  “RX  is  k" 

RK1= .  “RK1  is  Ki” 

RK2= .  “RK2  is  K2" 

RIX= .  “RIX  is  Ix” 

C  ENTER  DATA  FOR  CLOSED  LOOP  CASE  FIRST 

MO( 1 , 1)=F 

M0(1,8)=D  “for  KFLG  =  1” 

HO(2, 1)=-1 . 

M0(3 , 1)=-RK 
H0(3,3)=B 
M0(4,2)=-l . 

M0(4,3)=-l. 

M0(4, 4)=1 . 

MO(5 ,4)=-l . 

M0(5,5)=l . 

M0(6 ,4)=-RKl 

M0(6,6)=G 

M0(7.5)=-RK2 

H0(7,7)=H 

M0(8,6)=-l. 

M0(8,7)=-l. 

M0(8,8)=l 

H1(1,1)=E 

Mi(l ,8)=C  “for  KFLG=1” 

M1(2,2)=RIX 
H1(3,3)=A 
M1(6,6)=G 
H1(7,7)=H 
M2(l , 1 )=1 . 

BO(l)=D 

B1(1)=C 

C  COMPUTE  DENOMINATOR  FOR  CLOSED  LOOP 
C 

CALL  DTERM(l.O)  “determinant  of  M(s)  stored  in  POLYi” 

C 

C  COMPUTE  NUMERATOR  FOR  CLOSED  LOOP 

C 

CALL  DTERM(2 , 5)  “determinant  of  M5(s)  stored  in  POLY2” 
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c 

c 

c 

c 

c 

c 


c 

c 

c 

c 

c 

c 

c 

c 

c 


COPY  NUM.  AND  DENOM.  INTO  CLOSED  LOOP  TRANSFER  FUNCTION 

CALL  CPYPS(1 ,2,1)  “SPTFj  =  POLY2  /  POLYi” 

CHANGE  ELEMENTS  FOR  OPEN  LOOP  CONFIGURATION 

MO(l ,8)=0.  “since  KFLG=0” 

Ml(l,8)=0.  “since  KFLG=0” 

COMPUTE  DENOMINATOR  FOR  OPEN  LOOP 

CALL  DTERM(3,0)  “determinant  of  M(s)  stored  in  POLY3” 

COMPUTE  NUMERATOR  FOR  OPEN  LOOP 

CALL  DTERM(4,8)  “determinant  of  Mg(s)  stored  in  POLY4” 

COPY  NUM.  AND  DENOM.  INTO  OPEN  LOOP  TRANSFER  FUNCTION 
CALL  CPYPS(2,4,3)  “SPTP2  =  POLY4  /  POLY3” 


l 


9.2  Example  15  -  Modeling  a  System  as  a  Matrix  of  Laplace 
Transformed  Differential  Equations  Using  the  Augmented 
Method 


Problem:  Model  the  following  system  as  a  matrix  of  Laplace  transformed  differential  equations 
using  the  augmented  method  and  then  compute  the  closed  loop  transfer  function  9/ u  and 
the  open  loop  transfer  function  v/u  by  using  Cramer’s  method. 


C  s  ID 
s2  +  Es  +  F 


Ixs  xi  6 

9 

b 

(s2  +  As  +  B)  xi  —  K  6 

9  =  x  i  +  x2 

9 

s  9  =  9 

v 


K\ 

s  +  G 

x4 

K  2 

s  +  H 

Figure  9.3:  Continuous  System  with  Plant  Represented  by  a  Set  of  Equations 


This  example  is  similar  to  Example  14  except  that  the  augmented  method  is  used.  In  that  example, 
using  Cramer’s  method,  a  transfer  function  for  a  system  represented  by 

M(s)  y(s)  =  B(s)  u(s) 


was  given  as: 


yj(s)  det  Mj(s) 


u(s)  det  M(s) 

where  Mj(s)  is  equal  to  M(s)  with  column  j  replaced  by  B(s). 


Before  the  DTERM  command  was  implemented  in  LCAP2,  the  user  had  to  manually  substitute  the 
B(s)  vector  into  the  j-th  column  of  matrix  M(s)  in  order  to  compute  the  numerator  of  a  transfer 
function.  If  more  than  one  transfer  function  were  to  be  computed,  additional  effort  was  required 
by  the  user  to  restore  the  original  column  of  M(s)  before  another  determinant  was  computed.  The 
augmented  method  is  a  means  of  simplifying  this  operation  so  that  the  setup  effort  for  computing 
different  numerators  and  denominators  involves  only  changing  a  single  element  of  the  matrix. 

If  the  order  of  the  system  matrix  A(s)  is  nxn,  augment  the  vector  y  by  the  input  u  so  that  the 
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system  can  be  represented  as 


N(s) 


'  M(s)  -B(s)  ' 

y(s ) 

0  1 

u(s) 

Define  N(s)j,  as  a  (n+l)x(n+l)  matrix  whose  first  n  rows  are  equal  to  N(s)  and  all  elements  of 
row  n+1  are  equal  to  0  except  for  column  k  which  is  equal  to  1.  Then,  by  Cramer’s  method,  the 
transfer  function  between  the  input  u  and  the  Xj  is  given  by 


yj(s)  det  Nj(s) 


u(s)  det  Nn+1(s) 


Even  though  the  DTERM  command  used  in  Example  14  for  solving  this  problem  automatically 
inserts  the  B(s)  vector  into  the  system  matrix  for  the  user,  the  augmented  matrix  is  still  being 
used.  It  is  used  extensively  in  the  stability  analysis  programs  for  launch  vehicles  since  many  of  those 
analysis  programs  were  implemented  before  the  DTERM  command  was  available.  This  example  is 
intended  to  illustrate  the  utility  of  this  method  of  modeling  a  complex  continuous  system. 


The  set  of  Laplace  transformed  equations  for  this  problem  is: 


(s2  +  Es  +  F)6 

(s2  +  A.S  +  B)x  2 
0 
s9 

( a  +  G)x3 
( a  +  H)  i4 


=  {Cs  +  D){u-  KFLG  *v) 
=  6 
=  K6 
=  xi  +  x2 

=  9 
=  Kx9 
=  K20 
=  x3  +  x4 


The  augmented  matrix  form  of  these  equations  is 


'  M(s)  -B(s)  ' 

y(a) 

0  1 

u{s) 

where  x(s),  M(s),  and  B(s)  are  given  by 

x(s)  =  [tf,  x\,  x2, 9, 0, 13,  X4,  u] 


s2  +  Es  +  F 

0 

0 

0 

0 

0 

0 

KFLG  *  [Cs  +  D) 

-1 

hs 

0 

0 

0 

0 

0 

0 

-K 

0 

s2  ~f~  A.3  4"  B 

0 

0 

0 

0 

0 

0 

-1 

-1 

1 

0 

0 

0 

0 

0 

0 

0 

-1 

1 

0 

0 

0 

0 

0 

0 

-Kx 

0 

s  -f  G 

0 

n 

0 

0 

0 

0 

-K2 

0 

a  +  H 

0 

0 

0 

0 

0 

0 

-1 

-1 

1 
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B(s)  =  [{Ca  +  D),  0, 0,  0, 0,  0, 0, 0)T 


The  closed  loop  transfer  function  9(s)/u(s)  is  given  by 

9(s)  _  det  N5(j) 
u(s)  det  Ng(s) 

where 


and 


Ns(*) 


M(s)  -B(a)  ' 
00001000  0 


Na(s) 


M(j)  -B(s)  ' 
00000000  1 


Similarly,  the  open  loop  transfer  function  u(a)/u(s)  is  given  by 


v(s)  _  det  Ns(a) 
u(a)  det  Ng(j) 


where  the  value  of  KFLG  is  set  to  0. 


To  use  LCAP2  to  evaluate  the  above  transfer  functions,  the  polynomial  matrix  N*.(s)  is  represented 
by  the  input  matrices  M0,  Ml,  M2,  M3,  and  M4  as 


Nfc(s)  =  M4  s4  +  M3  s3  +  M2  s2  +  Ml  s  +  M0 


The  FORTRAN  code  for  this  example  is: 


C  ENTER  PARAMETERS  FOR  ORDER  AND  DEGREE  OF  MATRIX 
C 

MXM=9  “order  of  (n+l)x(n+l)  matrix” 

MDEG=2  “highest  degree  of  polynomial  element” 

C 

C  ENTER  DATA 

A= . 

B= . 

C= . 

D= . 

E= . 

F= . 
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G= . 

H= . 

RK= .  “RK  is  k” 

RK1= .  “RK1  is  K\” 

RK2= .  “RK2  is  Kj," 

RII= .  “RIX  is  Ix" 

C  ENTER  DATA  FOR  CLOSED  LOOP  CASE  FIRST 
MO(l , 1)=F 

M0(1,8)=D  “for  KFLG  =  1” 

HO(l ,9)=-D  “for  s**0  term  of  B(s)” 


M0(2,l)=-1. 

M0(3,1)=-RK 

HO(3,3)=B 

M0(4,2)=-l. 

M0(4,3)=-l. 

M0(4,4)=l. 

H0(5,4)=-l. 

H0(6,5)=l. 

M0(6,4)=-RK1 

M0(6,6)=G 

M0(7,5)=-PK2 

H0(7,7)=H 

M0(8,6)=-l. 

H0(8,7)=-l. 

H0(8,8)=l 

H0(9,9)=l 

H1(1,1)=E 

M1(1,8)=C  “for  KFLG=1” 

Hl(l,9)=-C  “for  s**l  term  of  B(s)” 

M1(2,2)=RIX 

M1(3,3)=A 

M1(6,6)=G 

M1(7,7)=H 

M2(l.l)-1. 

C  COMPUTE  DENOMINATOR  FOR  CLOSED  LOOP 
C 

CALL  DETRM(l)  “determinant  of  N9(s)  stored  in  POLYx” 

C 

C  CHANGE  ELEMENTS  FOR  NUMERATOR 

C 

M0(9,9)=0. 

M0(9,5)=l . 

C 

C  COMPUTE  NUMERATOR  FOR  CLOSED  LOOP 

C 

CALL  DETRMC2)  “determinant  of  N5(s)  stored  in  POLY2” 

C 

C  COPY  NUM.  AND  DENOM.  INTO  CLOSED  LOOP  TRANSFER  FUNCTION 
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c 

CALL  CPYPS(1,2,1)  “SPTFi  =  POLY2  /  POLYa” 

C 

C  CHANGE  ELEMENTS  FOR  OPEN  LOOP  CONFIGURATION 
C 

M0(l,8)=0.  “since  KFLG=0” 

Ml(l,8)=0.  “since  KFLG=0” 

C 

C  CHANGE  ELEMENTS  FOR  DENOMINATOR 

C 

M0(9,5)=0. 

M0(9,9)=l. 

C 

C  COMPUTE  DENOMINATOR  FOR  OPEN  LOOP 

C 

CALL  DETRM(3)  “determinant  of  Na(s)  stored  in  POLY3” 

C 

C  CHANGE  ELEMENTS  FOR  NUMERATOR 

C 

M0(9,9)=0. 

M0(9,8)=l. 

C 

C  COMPUTE  NUMERATOR  FOR  OPEN  LOOP 

C 

CALL  DETRM(4)  “determinant  of  Ng(s)  stored  in  POLY4” 

C 

C  COPY  NUM.  AND  DENOH.  INTO  OPEN  LOOP  TRANSFER  FUNCTION 

C 

CALL  CPYPS(2,4,3)  “SPTF2  =  POLY4  /  POLY3” 


L 


9.3  Example  16  -  S  Plane  Frequency  Response  of  Nonrational 
Functions 


Problem: 


Evaluate  the  open  and  closed  loop  frequency  response  of  the  following  system  which  has 
a  time  delay.  Assume  that  G(s)  has  been  loaded  into  SPTF3. 


Figure  9.4:  Closed  Loop  System  with  Time  Delay 

The  following  are  three  different  methods  available  in  LCAP2  for  computing  frequency  responses 
of  nonrational  s  plane  transfer  functions. 

1.  Use  a  Pade  approximation  (which  is  a  rational  function)  for  the  time  delay  so  that  a  rational 
transfer  function  can  be  computed.  The  desired  frequency  response  can  then  be  computed 
with  the  command  SFREQ. 

2.  If  an  s  plane  transfer  function  consists  of  a  rational  function  in  series  with  a  time  delay,  such 
as  G(S)e~d‘  in  this  example,  the  command  SFREQ  can  be  used  with  the  parameter  FDELAY 
set  equal  to  the  time  delay  d. 

3.  The  generalized  s  plane  frequency  response  command,  FREQS  can  be  used  to  compute  any 
function  which  can  be  coded  as  a  complex  function  by  the  user.  The  name  of  the  complex 
function  is  passed  as  the  argument  of  the  command  FREQS. 

This  example  will  only  describe  the  use  of  methods  2  and  3.  Method  2  will  be  used  to  compute 
the  open  loop  frequency  response  and  method  3  will  be  used  to  compute  the  closed  loop  frequency 
response. 

To  simplify  the  coding  of  user-defined  complex  functions  for  method  3,  complex  function  SFAUXl 
in  the  LCAP2  source  code  library  should  be  used.  This  function  is  set  up  so  that  the  user  can 
easily  compute  the  response  of  any  desired  s  plane  function  without  the  need  for  detail  knowledge 
on  how  the  interface  with  the  frequency  response  routine  is  implemented.  In  this  function  use  is 
made  of  complex  function  SFAUX(SPTFi)  which  will  compute  the  response  of  transfer  function 
SPTFi1.  Also,  the  frequency  parameter  used  for  evaluating  the  response  is  available  to  the  user  as 
the  variable  U  (in  rad/sec).  Thus,  the  following  FORTRAN  code  fragment  in  SFAUXl  will  define 
the  closed  loop  transfer  for  this  example: 


'Code  in  SFAUXl  is  set  up  so  that  i  must  be  between  1  and  5  if  no  additional  code  is  to  be  written  by  the  user. 
If  i  must  be  greater  than  5,  see  comments  in  the  SFAUXl  source  code. 
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COMPLEX  CTEMP  “temporary” 

EXTERNAL  SFAUXI 

D=  ...  “value  of  delay  d” 

DS=-D*U  “U  is  the  real  frequency  in  rad/sec” 

IF  (RAD .  EQ .  0)DS=DS*TWOPI  “convert  DS  to  Hz  if  RAD=0” 

CTEMP=SFAUX ( SPTF 3 ) ♦CEXP ( CMPLX ( 0 .  ,DS>)  “G(s)e~d*,  assuming  G(s)  is  in  SPTF3” 

SFAUX1=CTEMP/(1  .+CTEMP)  “closed  loop  transfer  function” 


The  UPDATE  inputs1,  which  include  the  FORTRAN  code,  for  this  example  is: 

r - 1 

*IDENT  idname 
♦INSERT  START. 1 

PROGRAM  LCAP2 ( INPUT , OUTPUT ,TAPE5=input , TAPE6=0UTPUT) 

♦CALL  C0MLCAP2 

EXTERNAL  SFAUXi  “place  here  before  first  executable  statement” 

CALL  INITO  “note  that  the  last  character  is  the  number  0” 

CALL  MINITO  “note  that  the  last  character  is  the  number  0” 

code  for  loading  in  SPTF3 

C  ENTER  FREQUENCY  PARAMETERS  FOR  AUTO  MODE 
FAUT0=1 
N0MEGA= . . . 

0MEGA(1)=. . . 

C 

C  ♦♦♦♦  COMPUTE  OPEN  LOOP  FREQUENCY  RESPONSE  ♦♦♦♦ 

FDELAY=d  “d  =  time  delay” 

CALL  SFREQ(3)  “compute  frequency  response  of  G(s)e~d*” 

C  ♦*♦♦  COMPUTE  CLOSED  LOOP  FREQUENCY  RESPONSE  ♦♦♦♦ 

C  RESET  FDELAY  TO  ZERO  SINCE  TIME  DELAY  WILL  BE  COMPUTED  IN  FUNCTION  SFAUXI 
FDELAY=0 

C  DEFINE  TRANSFER  FUNCTION  WITH  FUNCTION  SFAUXI 

CALL  FREQS(SFAUXl)  “SFAUXI  defines  the  closed  loop  transfer  function” 

CALL  LEXIT 
END 

♦DELETE  SFAUXI. 44  “SFAUXI. 44  is  the  card  ident  to  be  deleted  and 


‘The  UPDATE  inputs  are  presented  since  they  show  the  placement  of  the  ’’EXTERNAL  SFAUXI”  statement  and 
the  UPDATE  directives  needed  for  making  changes  to  COMPLEX  FUNCTION  SFAUXI. 
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replaced  by  the  following  statements” 

D=  ...  “value  of  delay  d” 

DS=-D*U  “U  is  the  frequency  ” 

CTEMP=SFAUX(SPTF3)*CEXP(CMPLX(0. ,DS))  “G(S)e-ds” 

C  EXPLANATION  OF  PREVIOUS  STATEMENT: 

C  SFAUX(SPTFS)  IS  A  COMPLEX  VALUE  EQUAL  TO  THE  RESPONSE  AT  FREQUENCY  U, 

C  WHERE  U  OF  COMMON/FRQBLK/  IS  THE  REAL  FREQUENCY  BEING  VARIED 

C  AUTOMATICALLY  BY  THE  LCAP2.  CEXP (CMPLX(0 . ,DS) )  IS  THE  COMPLEX  VALUE  OF 

C  THE  DELAY . 

C 

SFAUX1=CTEMP/(1 .  +CTEMP)  “closed  loop  transfer  function” 

C  SFAUX1  IS  THE  RETURNED  VALUE  OF  THE  COMPUTED  RESPONSE 


i 


9.4  Example  17  IEEE  CACSD  Benchmark  Problem  -  Simple 
Continuous  Model  (automated  analysis  method) 


Solution  of  the  simple  (13  state)  continuous  model  from  the  IEEE  CACSD  Benchmark  Problems 
[4)  is  presented  in  this  example  using  the  LCAP2  automated  analysis  method  based  on  transfer 
function  connection  blocks.  The  block  diagram  of  this  problem,  labeled  in  terms  of  (l)  LCAP2 
transfer  function  connection  blocks  and  (2)  LCAP  SPTFj  transfer  functions,  is  given  in  Figure  9.5. 

The  objectives  of  this  benchmark  problem  are: 

•  Time  response: 

Apply  a  step  input  at  77^  and  plot  the  output  at  t]p  from  t=0  to  t = 1 0  sec  in  0.1  sec  increments. 

•  Frequency  response: 

Break  the  Y4  and  Yi  feedback  paths  sequentially.  Generate  Bode  plots  (magnitude  in  dB 
and  phase  in  degrees)  for  each  break  for  50  frequency  points  over  the  range  0.01  <  w  <  100 
rad/sec. 

The  system  parameters  and  transfer  functions  are  given  as: 

al  =  . 08197 
a5=.2551 
a8=-.4283 
a9  =  .6645 
all  =  .3077 
al2=3.2314 
al3=.8597 
al4=-. 002323 
al5=-. 01139 
al6=45.112 
kl  =  l 
k2=1.25 
k3=. 001244 
k4=.l 
k5=. 01125 
k6=.06 
k9  =  29.82 

g2=  1  /(  (l/220)«  +  1) 

g3=  1  /(  (l/85/85)*s**2  +  (2*.6/85)*s  +  1  ) 

g5=  1  /(  (l/170)*s  +  1  ) 

g7=  1  /  s 

g9=g91*g92 
g9l=  (  s  +  1.5  )/s 

g92=  (  (!/l.*n)*s  +  1  )/(  (l/50)*s  +  1  ) 
gl=  1 
g4=  1 
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Figure  9,5:  IEEE  Benchmark  -  Block  Diagram  for  Simple  Continuous  Model 
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The  following  steps  were  used  to  solve  this  benchmark  problem: 

1.  Enter  in  constants 

2.  Load  in  s  plane  transfer  functions 

3.  Define  and  connect  transfer  function  blocks  for  closed  loop  configuration 

4.  Compute  closed  loop  transfer  function  (input  into  C13,  output  =  C2) 

5.  Compute  closed  loop  time  response  with  command  ZTIME 

6.  Compute  closed  loop  time  response  with  command  BlTIME 

7.  Change  connection  blocks  for  open  loop  at  Y4 

8.  Compute  open  loop  transfer  function  with  loop  opened  at  Y4  (input  into  C^,  output  —  Cn) 

9.  Compute  frequency  response  with  loop  opened  at  Y4 

10.  Change  connection  blocks  for  open  loop  at  Yj 

11.  Compute  open  loop  transfer  function  with  loop  opened  at  Yi  (input  into  Ci9)  output  =  Ci2) 

12.  Compute  frequency  response  with  loop  opened  at  Yi 

Since  there  are  many  steps  involved  in  the  solution  of  this  problem,  the  PRECMP  precompiler 
will  be  used  to  simplify  the  number  of  user  input  data.  This  data  will  be  annotated  with  the  step 
numbers  shown  above.  If  the  reader  has  read  Section  7.1  and  Chapter  8,  this  code  should  be  easy 
to  follow.  The  PRECMP  code  is: 

I - 1 

C  ****************************************************************** 

C  IEEE  CACSD  BENCHMARK  PROBLEM  -  SIMPLE  CONTINUOUS  MODEL 
C  ****************************************************************** 

c  1.  ****  ENTER  IN  CONSTANTS  **** 

C 

Al=. 08197 
A2=. 02296 
A3=-. 004879 
A4=-. 03402 
A5= . 2551 
A6= . 02549 
A7=- . 1199 
A8=- . 4283 
A9= . 6645 
A10= .4078 
All® . 3077 
A12=3 . 2314 
A13= . 8597 
A14=-. 002323 
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A15=-. 01139 
A16=45. 112 
BB1=. 007429 
BB2=. 07520 
BB3=. 06919 
BB4=- . 8272 
BB5=. 03861 
BB6=- . 3616 
BB7=- . 3920 
BB8=-. 03882 
BB9= . 8064 
BB10=- . 1037 
BB11= . 3077 
BB12=3 . 2314 
BB13= . 0 
BB14=. 002115 
BB15=-. 01139 
BB16=45 . 112 
BB17= . 4040 
Cl=-. 01523 
C2=. 06768 
C3=. 01514 
C4=. 002194 
C5=. 07528 
C6=-. 0002996 
07=3030.76 
Kl=l . 

K2=l . 25 
K3=. 001244 
K4=  .1 
K5=. 01125 
K6= . 06 
K9=2£ .82 
Kll=. 01120 
K12= . 565 
K13=2. 9 
K14= . 66 
C 

C  FOR  SIMPLE  MODEL 
K7=0 
K8=0 
K10=0 
Gl  =  l. 

C 

C  2.  LOAD  IB  S  PLABE  TRABSFER  FUBCTIOBS  **+* 

*POLYB  0  A1 
♦POLYD  0  1 
•SPLDC  1 


c 

♦POLYN  0  All 
♦POLYD  0  1 
♦SPLDC  2 
C 

♦POLYN  0  A12 
♦POLYD  0  1 
♦SPLDC  3 
C 

♦POLYN  0  AS 
♦POLYD  0  1 
♦SPLDC  4 
C 

♦POLYN  0  1 
♦POLYD  101 
♦SPLDC  5 
C 

♦POLYN  0  A13 
♦POLYD  0  1 
♦SPLDC  6 
C 

♦POLYN  0  A9 
♦POLYD  0  1 
♦SPLDC  7 
C 

♦POLYN  0  A14 
♦POLYD  0  1 
♦SPLDC  8 
C 

♦POLYN  0  A1S 
♦POLYD  0  1 
♦SPLDC  9 
C 

♦POLYN  0  A8 
♦POLYD  0  1 
♦SPLDC  10 
C 

♦POLYN  0  A16 
♦POLYD  0  1 
♦SPLDC  11 
C 

♦POLYN  0  1 . 2*K1*K2 
♦POLYD  0  1 
♦SPLDC  13 
C 

♦ROOTN  K1+X2*G1 
♦ROOTD  1.  -220. 
♦SPLDR  14 
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c 

♦ROOTS  K2*K4*G1 
♦ROOTD  1.  [-6,85.] 

♦SPLDR  15 
C 

♦POLYS  0  K3 
♦POLYD  0  1 
♦SPLDC  16 
C 

♦ROOTS  1.  0.  -30. 

♦ROOTD  1.  -80.  [.3,160.]  -1600. 

♦SPLDR  17 
C 

♦ROOTS  K9*l . 5  -1.5  -ISO. 

♦ROOTD  1.  0.  0.  -50. 

♦SPLDR  18 
C 

♦POLYS  0  K2*K5 
♦POLYD  0  1. 

♦SPLDC  20 
C 

♦ROOTS  K2+K6 
♦ROOTD  1.  -170. 

♦SPLDR  21 
C 

C  3.  ♦♦♦♦  DEFIBE  ASD  COSBECT  TRABSFER  FUHCTIOB  BLOCKS  FOR  CLOSED 
C  ♦♦♦♦  LOOP  COBFIGURATIOI 

C 

♦B1IBIT  ’ IEEE  BESCHHARK-SIMPLE  COST.  MODEL,  CLOSED  LOOP’  .. 

'SEW'  21 
C 

♦IYCIS  18 

IBDX=1 

ISPTF=1 

SYCIB=1 

♦B1CEQ  ’  A1  BLOCK’  IBDX  ISPTF  0  BYCIS 
C 

♦IYCIS  1  4 

♦B1CEQ  ’All  BLOCK’  2202 
C 

♦IYCIS  2 

♦B1CEQ  ’ A12  BLOCK’  3301 
C 

♦IYCIS  5 

♦B1CEQ  ’ A5  BLOCK’  4401 
C 

♦IYCIS  6 

♦B1CEQ  ’ IBTEGRATOR’  5501 


9-21 


c 

♦IYCIN 

♦BICEq 

C 

♦IYCIN 

♦BICEq 

C 

♦IYCIN 

♦BICEq 

C 

♦IYCIN 

♦BICEq 

C 

♦IYCIN 

♦BICEq 

C 

♦IYCIN 

♦BICEq 

C 

♦IYCIN 

♦BICEq 

c 

♦IYCIN 

♦BICEq 

c 

♦IYCIN 

♦BICEq 

C 

♦IYCIN 

♦BICEq 

C 

♦IYCIN 

♦BICEq 

C 

♦IYCIN 

♦BICEq 

C 

♦IYCIN 

♦BICEq 

c 

♦IYCIN 

♦BICEq 

c 

♦IYCIN 

♦BICEq 

c 

♦IYCIN 

♦BICEq 


-3  12 

'  A13  BLOCK'  6602 

5 

'A9  BLOCK'  7701 

6 

’ A14  BLOCK'  8801 
12 

’ A15  BLOCK’  9901 
18 

’ A8  BLOCK'  10  10  0  1 
7  8  9  10 

’ A16  BLOCK’  11  11  0  4 
11 

'INTEGRATOR'  12  5  0  1 
0 

*1.2*K1*K2  BLOCK’  13  13  0  0 
2  16 

’K1*K2*G1*G2  BLOCK’  14  14  0  2 
2  16 

’ K2*K4*G1*G3  BLOCK'  16  16  0  2 
11 

'K3  BLOCK’  16  16  0  1 
15  20 

'G6  BLOCK’  17  17  0  2 
-13  14  17  21 

’K9*G7*G8*G9  BLOCK’  18  18  0  4 
12 

’ G4  BLOCK’  19  0  0  1 
19 

’K2*K5  BLOCK’  20  20  0  1 
19 

’K2*K6*G6  BLOCK’  21  21  0  1 
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c 

•BIEND 

C 

c  ****  CONNECTION  OF  TRANSFER  FUNCTION  BLOCKS  COMPLETED  **** 

C 

C  4.  ****  COMPUTE  CLOSED  LOOP  TRANSFER  FUNCTION  **** 

C 

UCIN=13 
UMAGN=1 . 

YC0UT=2 

PRINT*. ’CLOSED  LOOP  TRANSFER  FUNCTION  WILL  BE  IN  SPTF30’ 

C  SET  PRNMTRX=1  FOR  PRINTOUT  OF  COMPUTED  STATE  SPACE  MATRICES 
PRNMTRX=1 
*B1TF  30 
C 

C  S.  ****  COMPUTE  CLOSED  LOOP  TIME  RESPONSE  WITH  COMMAND  STIME  **** 

C 

TMAGN=1 . 

TEND=10 . 

TDELT=.01 

HRDCPY=1 

TITLE 1=’ EXAMPLE  17,  IEEE  BENCHMARK,  SIMPLE  CONTINUOUS  MODEL’ 
TITLE2= ’TIME  RESPONSE  OF  ETA-P/ETA-RHO ’ 

*STIME  30 
C 

C  6.  ****  COMPUTE  CLOSED  LOOP  TIME  RESPONSE  WITH  COMMAND  BITIME  **** 
UCIN=13 
UMAGN-1 . 

YC0UT=2 
CALL  B1TIMEO 
C 

C  7.  ****  CHANGE  CONNECTION  DATA  FOR  OPEN  LOOP  AT  Y4  **** 

C 

*B1INIT  ’IEEE  BENCHMARK-SIMPLE  CONT.  MODEL,  OPEN  LOOP  AT  Y4’  .. 

’OLD’  21 

•B1CEQ  ’K3  BLOCK’  16  16  0  0  !  OPEN  LOOP  AT  Y4 

*B1END 

C 

C  8.  ****  COMPUTE  OPEN  LOOP  T.F.  WITH  LOOP  OPENED  AT  Y4  **** 

UCIN=16 
UMAGN=1 . 

YC0UT=11 

PRINT*, ’OPEN  LOOP  T.F.  AT  Y4  WILL  BE  STORED  IN  SPTF31 ’ 

*B1TF  31 
C 

C  9.  ****  COMPUTE  FREQUENCY  RESPONSE  WITH  LOOP  OPENED  AT  Y4  *** 
N0MEGA=4 

•OMEGA  .1  1.  10.  100. 
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FNIC0=1 

TITLE1=  * OPEN  LOOP  TRANSFER  FUNCTION  AT  Y4’ 

CALL  SFREQ(31) 

C 

C  10.  ****  CHANGE  CONNECTION  DATA  FOR  OPEN  LOOP  AT  Y1  **** 

*B1INIT  ’IEEE  BENCHMARK-SIMPLE  CONT.  MODEL,  OPEN  LOOP  AT  Yl’  .. 

’OLD’  21 

♦IYCIN  11 

♦B1CEQ  ’K3  BLOCK’  16  16  1  !  CLOSE  LOOP  AT  Y4 

C 

♦B1CEQ  ’G4  BLOCK’  19  0  0  !  OPEN  LOOP  AT  Yl 

*B1END 

C 

C  11.  ****  COMPUTE  OPEN  LOOP  T.F.  WITH  LOOP  OPENED  AT  Yl  **** 
UCIN=19 
UMAGN=1 . 

YC0UT=12 

PRINT* , ’ OPEN  LOOP  T.F.  AT  Yl  WILL  BE  STORED  IN  SPTF32’ 

*B1TF  32 
C 

C  12.  ****  COMPUTE  FREQUENCY  RESPONSE  WITH  LOOP  OPENED  AT  Yl  «■*** 
TITLE1= ’ OPEN  LOOP  TRANSFER  FUNCTION  AT  Yl ’ 

CALL  SFREQ(32) 


L 


Since  the  complete  output  of  the  example  is  too  long  to  be  included  in  this  report,  only  selected 
output  is  shown.  The  output  from  Step  4  for  the  command  BlTF  is: 


CLOSED  LOOP  TRANSFER  FUNCTION  WILL  BE  IN  SPTF30 

IEEE  BENCHMARK-SIMPLE  CONT.  M0DE1,  CLOSED  LOOP 
NUMBER  OF  CONTINUOUS  BLOCKS  =  21 


BLOCK 

DESCRIPTION 

Cl 

A1  BLOCK 

C2 

All  BLOCK 

C3 

A12  BLOCK 

C4 

A5  BLOCK 

C5 

INTEGRATOR 

C6 

A13  BLOCK 

C7 

A9  BLOCK 

C8 

A14  BLOCK 

C9 

A15  BLOCK 

CIO 

A8  BLOCK 

Cll 

A16  BLOCK 

C12 

INTEGRATOR 
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C13  1 . 2*K1*K2  BLOCK 

C14  K1*K2*G1*G2  BLOCK 

C15  K2*K4*G1*G3  BLOCK 

C16  K3  BLOCK 

C17  G6  BLOCK 

C18  K9*G7*G8*G9  BLOCK 

C19  G4  BLOCK 

C20  K2*K5  BLOCK 

C21  K2*K6*GS  BLOCK 


BLOCK 

TRANSFER  FUNCTION 

INPUTS  FROM  BLOCKS 

Cl 

SPTF1 

C18 

C2 

3PTF2 

Cl 

.  C4 

C3 

SPTF3 

C2 

C4 

SPTF4 

CS 

CS 

SPTFS 

C6 

C6 

SPTF6 

-C3 

,  C12 

L7 

SPTF7 

CS 

C8 

SPTF8 

C6 

C9 

SPTF9 

C12 

CIO 

SPTFIO 

C18 

Cll 

SPTF11 

C7 

,  C8  ,  C9  ,  CIO 

C12 

SPTF5 

Cll 

C13 

SPTF13 

HAS 

NO  INPUT 

C14 

SPTF14 

C2 

,  C16 

CIS 

SPTF15 

C2 

,  C16 

C16 

SPTF16 

Cll 

C17 

SPTF17 

CIS 

,  C20 

C18 

SPTF18 

-C13 

.  C14  ,  C17  ,  C21 

C19 

SPTFO 

C12 

C20 

SPTF21 

C19 

C21 

SPTF22 

C19 

INPUT  U 

IS  CONNECTED  TO  BLOCK 

C13 

MAGNITUDE  OF  U  =  . lOOOOE+Ol 

BLOCK  C2  IS  THE  OUTPUT 

********************************************************************** 

*  B1TF  -  BLOCK1:  FIND  TRANSFER  FUNCTION  FROM  C13  TO  C2  * 

*  AND  STORE  IN  SPTF30  * 

ft********************************************************************* 

COMPUTED  CONTINUOUS  DYNAMICS  STATE  SPACE  REPRESENTATION  IS 
D(X)/DT  =  A  *  X  +  B  *  U 
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Y 


C  *  X  +  D  *  U 


WHERE  X  IS  A  SET  OF  S-PLANE  STATE  VARIABLES 


A  IS  A  (13,13)  MATRIX 
B  IS  A  (13,  1)  MATRIX 
C  IS  A  (21,13)  MATRIX 
D  IS  A  (21,  1)  MATRIX 
Y  IS  THE  OUTPUT  VECTOR  OF  LENGTH  21 


(THE  I-TH  ELEMENT  OF  ’ 
MATRIX  A  IS 

(  1,  1) - . 21805980E+00 
(  2,  1)  . 29999776E+02 
(  3,  1)  . 31848847E+02 
(  3,10)  . 32873369E+00 
(  S,  1)  . 104S94B1E+03 
(  5,10)  . 10795913E+01 
(  7,  2)  . 15360000E+07 
(  7,  8)  . 10000000E+01 
(  8,  6) - . 55296000E+08 
(10,  3)  . 99400000E+01 

(10,11)  . 10000000E+01 
(11,  6)  . 15059100E+04 
(12,  3)  . 22365000E+04 
(13,  2)  . 12750000E+02 
MATRIX  B  IS 

(10,  1) - . 14910000E+02 

MATRIX  C  IS 

(  1,10)  . 81970000E-01 
(  3,  1)  . 25364638E+00 
(  5,  1)  . 10000000E+01 
(  6,10)-. 70068058E-01 
(  8,  2)- . 19970831E-02 

(10.10) -. 42830000E+00 

(11.10) -. 19314127E+02 
(15,  4)  . 10000000E+01 

(16.10) -. 24026774E-01 

(19.  2)  . 10000000E+01 
MATRIX  D  IS 

(13,  1)  . 15000000E+01 


IS  TEE  OUTPUT  OF  THE 

(  1,  2)  .85970000E+00 
(  2,  2) - . 60391809E+00 
(  3,  2) - . 20660038E+00 
(  4,  4) - . 10200000E+03 
(  5,  2) - . 67849443E+00 
(  6,  6) - . 17760000E+04 
(  7,  4)  . 10922667E+09 
(  8.  2)  .46080000E+08 
(  8,  9)  . 10000000E+01 
(10.  6)  . 99400000E+01 
(10,13)  . 99400000E+01 

(11.12)  . 10000000E+01 
(12,  6)  . 22365000E+04 

(13.13) -. 17000000E+03 

(11,  1)- . 22588650E+04 


(  2,  1)  . 78494270E-01 
(  3,10)  . 81502917E-01 
(  6,  1)- . 21805980E+00 
(  7,  1)  . 66450000E+00 
(  8,10)  . 16276810E-03 
(11,  1)  . 29999776E+02 
(12,  2)  . 10000000E+01 
(16,  1)  . 37319721E-01 
(17,  6)  . 10000000E+01 
(20,  2)  . 14062500E-01 


THE  COMMON  ROOTS  ELIMINATED  ARE 
NO.  REAL  IMAG. 

1  -1600.0000  0. 

2  -220.00000  0. 


OF  LENGTH  13 


I-TH  CONNECTION  BLOCK) 

(  1,10)-  700680S8E-01 
(  2 , 10) - . 19314127E+02 
(  3,  3) - . 22000000E+03 
(  4,  5)  . 10000000E+01 
(  5,  4) - . 72250000E+04 
(  6,  7)  . 10000000E+01 
(  7,  6) - . 31488000E+06 
(  8,  4)  . 32768000E+10 
(  9,  6) - . 32768000E+10 

(10,10)-. 50000C00E+02 
(11,  3)  . 1S059100E+04 

(11.13)  . 15059100E+04 

(12.13)  . 22365000E+04 


(12,  1 ) - . 33547500E+04 


(  2,10)  . 25222169E-01 
(  4,  1)  . 25510000E+00 
(  6,  2)  . 85970000E+00 
(  8,  1)  . 50655291E-03 
(  9,  2)- . 11390000E-01 
(11,  2)- . 60391809E+00 
(14,  3)  . 10000000E+01 
(16,  2)- . 75 12741 IE-03 

(18,10)  . 10000000E+01 

(21,13)  . 10000000E+01 


OMEGA  ZETA 
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3 

-170.00000 

0. 

THE  NUMERATOR  ROOTS 

OF  SR00T30  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-48.000000 

152.63027 

160.00000 

.30000000 

2 

-48 . 000000 

-152.63027 

160.00000 

.30000000 

3 

-51.000000 

68.000000 

85.000000 

.60000000 

4 

-51.000000 

-68.000000 

85.000000 

.60000000 

5 

-150.00000 

0. 

6 

-80.000000 

0. 

7 

8.5046654 

0. 

8 

-9.1085835 

0. 

9 

-1.5000000 

0. 

LOW  ORDER  NONZERO  :  FICIENT  =  .582037682E+22 

THE  DENOMINATOR  ROOTS  OF  SR00T3O  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-44.092603 

150.02933 

156.37441 

.28196815 

2 

-44.092603 

-150.02933 

156.37441 

.28196815 

3 

-51.266369 

67.429071 

84.704901 

.60523498 

4 

-51.266369 

-67.429071 

84.704901 

.60523498 

5 

-65.215104 

13.666998 

66.631799 

97873846 

6 

-65.215104 

-13.666998 

66.631799 

.97873846 

7 

-.62434498 

4.7138755 

4.7429485 

.11056264 

8 

-.52434498 

-4.7138755 

4.7429485 

.11055254 

9 

-6.7150865 

0. 

10 

-.96347515 

0. 

LOW  ORDER  NONZERO 

COEFFICIENT  = 

.57741883E+22 

DEGREE 

OF  NUMERATOR 

OF  SPTF30  IS  9 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

5 . 803768209021E+21  4. 038871396247E+21  4. 034049515012E+19  -5. 128910870111E+19 
-1 . 891779440678E+18  -3.333S11114137E+16  -3.524184416543E+14  -2.27243239L348E+12 

-9 . 678878953207E+9  -22503582 .38103 

DEGREE  OF  DENOMINATOR  OF  SPTF30  IS  10  (COEFFICIENTS  IN  ASCENDING  ORDER) 

6 . 774188337049E+21  7 . 645575848071E+21  1 . 98128939038E+21  4.445690030619E+20 
6 . 533523088991E+19  2 . 5778S16572S9E+18  5 . 026005806442E+16  5 . 026005806442E+16 
5 . 890697382345E+14  4. 338767884133E+12  1 .968115955848E+10  59843817.12135 


BODE  GAIN  =  1.0051228 
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The  above  output  for  the  command  BlTF  summarizes  all  of  the  connection  blocks  so  that  the 
analyst  can  easily  verify  that  the  system  is  correctly  modeled.  The  computed  state  space  matrices 
are  printed  out  since  the  parameter  PRNMTRX  was  set  to  1.  Thirteen  states  were  computed  from 
the  dynamics  associated  with  connection  blocks  C5,  C12,  C14,  Cig,  and  C21  (they  correspond  to 
states  X(l),  X(l),  X(3),  X(4),  X(6),  X(10),  and  X(13),  respectively).  All  other  connection  blocks 
are  algebraic  blocks  which  do  not  affect  the  size  of  the  system  matrix.  The  output  of  each  C; 
block  is  computed  using  matrices  C  and  D.  For  example,  the  output  connection  block  C2  is  the 
sum  of  C(2,l)*X(l)  and  C(2,10)*X(10)  which  are  the  output  of  connection  blocks  C5  and  Cn>, 
respectively. 

The  computed  closed  loop  transfer  function  is  stored  in  SPTF30.  This  transfer  function  is  used  in 
Step  5  to  compute  the  inverse  Laplace  transform  and  time  response.  Portions  of  the  output  from 
this  step  is  given  by: 


************************************************************ 
*  STIME  =  TIME  RESPONSE  OF  S-PLANE  TRANSFER  * 


* 

FUNCTION 

30 

* 

************************************************************ 

COMPUTE  STEP  RESPONSE 

SCALE 

INPUT  BY  TMAGN, 

(TMAGN  =  1.00000 

) 

NO. 

ROOT 

PARTIAL  FRACTION 

COEFFICIENT 

1 

-44.092603 

150.02933 

- . 12032418E-04 

- . 90545444E-04 

2 

-44.092603 

-150.02933 

- . 12032418E-04 

. 90545444E-04 

3 

-51.266369 

67.429071 

- . 34822493E-04 

. 59647045E-04 

4 

-51.266369 

-67.429071 

- . 34822493E-04 

- . 59647045E-04 

5 

-65.215104 

13.666998 

- . 58203 173E-02 

. 14050461E-02 

6 

-65.215104 

-13.666998 

- .58203173E-02 

- . 14050461E-02 

7 

-.52434498 

4.7138755 

-.19165032 

.29006868 

8 

-.52434498 

-4.7138755 

-.19165032 

-.29006868 

9 

-5.7160865 

0. 

-.17370408 

0. 

10 

-.96347515 

0. 

-.43638372 

0. 

11 

0. 

0. 

1.0051228 

0. 

ANALYTICAL  SOLUTION  IS  THE  SUMMATION  OF  THE  FOLLOWING  7  TERMS 


((-.2406E-04)*(COS(  150. 
C ( - . 6964E-04) * (CQS(  67.4 
(C-.H64E-01)*(C0S(  13.7 
((-.3833  )*(C0S(  4.71 


(  1.0051 

*T) )  +  (  .18UE-03)*(SIN(  150. 
*T))+(-.1193E-03)*(SIN(  67.4 
*T) )+(- . 2810E-02)+(SIN(  13.7 
*T) )•*■(-. 5801  )*(SIN(  4.71 

(  -.17370  )  *  E**( 

(  -.43638  )  *  E**( 


)  *  T**  0 

*T)))*E**(-44.09*T) 
*T)))*E**(-5i.27*T) 
*T)))*E**(-65.22*T) 
*T)  )  ) *E**(-  .  5243*T) 
-6.7161  *  T) 

-.96348  *  T) 
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Neither  the  tabular  output  of  the  response  nor  the  low  resolution  printer  plot  is  presented;  however, 
the  high  resolution  plot  is  presented  in  Appendix  H. 

The  step  response  computed  by  state  space  method  in  Step  fi  is  identical  to  the  results  of  Step  5. 
The  computed  state  space  matrices  are  the  same  as  the  ones  computed  in  Step  4. 

After  the  loop  at  Y4  is  opened  in  Step  7,  the  command  B1TF  is  used  to  compute  the  the  open  loop 
transfer  function.  Since  the  format  of  the  output  is  similar  to  that  presented  in  Step  4,  only  the 
final  results  of  this  open  loop  transfer  function  are  presented  below: 

[ - 1 

INPUT  U  IS  CONNECTED  TO  BLOCK  C16 
MAGNITUDE  OF  U  =  .10000E+01 

BLOCK  Cll  IS  THE  OUTPUT 

*>t‘"M‘**>l'*>('********  +  **************’*’M<**'t"l'****  +  **’****’M>****************** 

*  B1TF  -  BL0CK1:  FIND  TRANSFER  FUNCTION  FROM  C16  TO  Cll  * 

*  AND  STORE  IN  SPTF31  * 

********************************************************************** 


COMPUTED  CONTINUOUS  DYNAMICS  STATE  SPACE  REPRESENTATION  IS 

D(X)/DT  =  A  *  I  +  B  *  U 
Y  =  C  *  X  +  D*U 


WHERE  X  IS  A  SET  OF  S-PLANE  STATE  VARIABLES 


A  IS  A  (13,13)  MATRIX 
B  IS  A  (13,  1)  MATRIX 
C  IS  A  (21,13)  MATRIX 
D  IS  A  (21,  1)  MATRIX 
Y  IS  THE  OUTPUT  VECTOR  OF  LENGTH  21 


(THE  I-TH  ELEMENT  OF  ' 
MATRIX  A  IS 

(  1,  1 ) - . 21805980E+00 
(  2,  1)  .29999776E+02 
(  3,  1)  . 21585924E+02 
(  4,  4)- . 10200000E+03 
(  5,  4) - . 72250000E+04 
(  6,  7)  . 10000000E+01 
(  7,  6) - . 31488000E+06 
(  8,  4)  . 32768000E+10 
(  9,  6) - . 32768000E+10 

(10,10)-. 50000000E+02 
(11,  3)  . 15059100E+04 
(11,13)  . 150S9100E+04 


IS  THE  OUTPUT  OF  THE 

(  1,  2)  . 85970000E+00 
(  2,  2)- . 60391809E+00 
(  3,  3) - . 22000000E+03 
(  4,  5)  . 10000000E+01 
(  5,10)  . 22778771E+02 
(  7,  2)  . 15360000E+07 
(  7,  8)  . lOGOOOOOE+Ol 
(  8,  6)- . 55296000E+08 
(10,  3)  . 99400000E+01 

(10,11)  . 10000000E+01 
(11,  6)  . 15059100E+04 
(12,  3)  . 22365000E+04 


OF  LENGTH  13 


I-TH  CONNECTION  BLOCK) 

(  1 , 10)- . 70068058E-01 
(  2,10)-. 19314127E+02 
(  3,10)  . 69360965E+01 
(  5,  1)  . 70890138E+02 
(  6,  6) - . 17760000E+04 
(  7,  4)  . 10922667E+09 
(  8,  2)  .A6080000E+08 
(  8,  9)  . 10000000E+01 
(10,  6)  . 99400000E+01 
(10,13)  . 99400000E+01 

(11,12)  . 10000000E+01 
(12,  6)  . 22365000E+04 
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(12,13)  . 22365000E+04  (13,  2)  . 12750000E+02  (13 , 13)- . 17000000E+03 
MATRIX  B  IS 

(  3,  1)  . 342100C0E+00  (  5,  1)  . 11234875E+01 
MATRIX  C  IS 

(  1,10)  . 81970000E-01  (  2.  1)  . 78494270E-01  (  2,10)  . 25222169E-01 

(  3,  1)  . 25364638E+00  (  3,10)  . 81502917E-01  (  4,  1)  . 2SS10000E+00 

(  5,  1)  . 10000000E+01  (  6,  l)- .21805980E+00  (  6,  2)  . 8S970000E+00 

(  6,10)-. 70068058E-01  (  7,  l)  . 66450000E+00  (  8,  1)  . S06SS291E-03 

(  8,  2)- . 19970831E-02  (  8,10)  . 16276810E-03  (  9,  2) - . 11390000E-01 

(10.10) -. 42830000E+00  (11,  1)  . 29999776E+02  (11,  2)- .60391809E+00 

(11.10) -. 19314127E+02  (12,  2)  . 10000000E+01  (14,  3)  . 10000000E+01 

(15,  4)  . 10000000E+01  (17,  6)  . 10000000E+01  (18,10)  . 10000000E+01 

19,  2)  . 1G000000E+01  (20,  2)  . 14062500E-01  (21,13)  . 10000000E+01 
MATRIX  D  IS 

16,  1)  . 12440000E-02 

THE  COMMON  ROOTS  ELIMINATED  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-170.00000 

0. 

THE  NUMERATOR  ROOTS  OF  SR00T31 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

40.155541 

493.26742 

494.89919 

- . 81138829E 

2 

40.155541 

-493.26742 

494.89919 

- . 81138829E 

3 

-1721.1005 

0. 

4 

-202.28422 

0. 

5 

-150.00000 

0. 

6 

-22.689956 

0. 

7 

-12.236364 

0. 

8 

-.32689340 

0. 

9 

-1.5000000 

0. 

10 

0. 

0. 

LOW  ORDER  NONZERO  COEFFICIENT  = 

- . 19441954E+20 

THE  DENOMINATOR  ROOTS 

OF  SR00T31 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-43.556200 

153.17063 

159.24316 

.27352006 

2 

-43.556200 

-153.17063 

159.24316 

.27352006 

3 

-52.948241 

51.908661 

74.148671 

.71408214 

4 

-52.948241 

-51.908661 

74.148671 

.71408214 

5 

-64.236758 

32.236076 

71.871592 

.89377119 

6 

-64.236758 

-32.236076 

71.871592 

.89377119 

9-30 


5.0261118 

-5.0261118 


5.0433655 

5.0433655 


. 82646606E-01 
. 82646606E-01 


-.41681705 

-.41681705 

-1599.9227 

-220.13034 

-5.4775769 

-.96106888 


LOW  ORDER  NONZERO  COEFFICIENT  =  . 57741883E+22 

DEGREE  OF  NUMERATOR  OF  SPTF31  IS  10  (COEFFICIENTS  IN  ASCENDING  ORDER) 

0.  -1 . 944195413229E+19  -7 . 511257462116E+19  -4 . 9721269018E+19  -5 . 830992556724E+18 
-2 . 070234735638E+17  -1 . 905771067787E+15  -5 . 9831568368E+12  -8 . 80551195449E+9 
-22663264.14444  -11165.12162595 

DEGREE  OF  DENOMINATOR  OF  SPTF31  IS  12  (COEFFICIENTS  IN  ASCENDING  ORDER) 

5 . 774188337049E+21  7 . 555988560843E+21  1 . 9452065990S5E+21  4.051131250508E+20 
6. 180842727466E+19  2 . 709895512996E+18  6 . 186825255004E+16  8.50272624298E+14 
7 . 518455107493E+12  4. 376503808893E+10  173917735.4379  365327.90872  170.0142370976 

BODE  GAIN  =  - . 33C70454E-02 


In  Step  9  the  frequency  response  with  the  loop  opened  at  Y4  is  computed.1  The  printer  output  for 
this  case  is  not  shown.  However,  the  high  resolution  plot  is  presented  in  Appendix  H.  Note  that 
the  response  as  computed  is  the  negative  of  open  loop  frequency  response  normally  used  to  assess 
stability. 

Similarly,  the  open  loop  loop  transfer  function  with  the  loop  opened  at  Yi  (Step  11)  is  presented 
below: 


INPUT  U  IS  CONNECTED  TO  BLOCK  C20 
MAGNITUDE  OF  U  =  .10000E+01 

BLOCK  C12  IS  THE  OUTPUT 

********************************************************************** 

*  B1TF  -  BL0CK1:  FIND  TRANSFER  FUNCTION  FROM  C20  TO  C12  * 

*  AND  STORE  IN  SPTF32  * 

********************************************************************** 

COMPUTED  CONTINUOUS  DYNAMICS  STATE  SPACE  REPRESENTATION  IS 

D(X)/DT  =  A  *  X  +  B  *  U 
Y  =  C  *  X  +  D  *  U 

'The  frequency  response  could  also  have  been  computed  with  command  BlFREQ  which  would  have  yielded 
identical  results. 
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WHERE  X  IS  A  SET  OF  S-PLANE  STATE  VARIABLES  OF  LENGTH  13 

A  IS  A  (13,13)  MATRIX 
B  IS  A  (13,  1)  MATRIX 
C  IS  A  (21,13)  MATRIX 
D  IS  A  (21,  1)  MATRIX 
Y  IS  THE  OUTPUT  VECTOR  OF  LENGTH  21 


(THE  I-TH  ELEMENT  OF  Y  IS  THE  OUTPUT  OF  THE  I-TH  CONNECTION  BLOCK) 
MATRIX  A  IS 


(  l.  D- 

,  21805980E+00 

(  1. 

2) 

.  85970000E+00 

(  1,10)- 

. 70068058E-01 

(  2,  1) 

.  29999776E+02 

(  2, 

2)- 

.  60391809E+00 

(  2,10)- 

. 19314127E+02 

(  3,  1) 

.  31848847E+02 

(  3, 

2)- 

.  20660038E+00 

(  3,  3)- 

. 22000000E+03 

(  3,10) 

.  32873369E+00 

(  4, 

4)- 

.  10200000E+03 

(  4,  5) 

. lOOOOOOOE+Ol 

(  5,  1) 

.  10459451E+03 

(  s, 

2)- 

.  67849443E+00 

(  5,  4)- 

.  72250000E+04 

(  5,10) 

.  10795913E+01 

(  6, 

6)- 

.  17760000E+04 

(  6,  7) 

. lOOOOOOOE+Ol 

(  7,  4) 

.  10922667E+09 

(  7, 

6)- 

.  31488000E+06 

(  7,  8) 

.  lOOOOOOOE+Ol 

(  8,  4) 

.  32768000E+10 

(  8, 

6)- 

.  55296000E+08 

(  8,  9) 

.  lOOOOOOOE+Ol 

(  9,  6)- 

.  32768000E+10 

(10. 

3) 

.  9S400000E+01 

(10,  6) 

. 99400000E+01 

(10,10)- 

.  50000000E+02 

(10, 

11) 

.  lOOOOOOOE+Ol 

(10,13) 

.  99400000E+01 

(11,  3) 

.  15059100E+04 

(11, 

6) 

.  15059100E+04 

(11,12) 

.  lOOOOOOOE+Ol 

(11,13) 

.  15059100E+04 

(12, 

3) 

.  22365000E+04 

(12,  6) 

. 22365000E+04 

(12,13) 

"2365000E+04 

(13, 

13)- 

.  17000000E+03 

MATRIX  B 

IS 

(  7,  1)  . 

.  15360000E+07 

(  8, 

1) 

.  46080000E+08 

(13,  1) 

. 12750000E+02 

MATRIX  C 

IS 

(  1,10) 

.  81970000E-01 

(  2, 

1) 

.  78494270E-01 

(  2,10) 

. 25222169E-01 

(  3,  1) 

.  25364638E+00 

(  3, 

10) 

.  81502917E-01 

(  4,  1) 

. 25510000E+00 

(  5,  1) 

.  lOOOOOOOE+Ol 

(  6, 

D- 

.  21805980E+00 

(  6,  2' 

85970000E+00 

(  6,10)- 

.  70068058E-01 

(  7, 

l) 

.  66450000E+00 

(  8,  1) 

.  50655291E-03 

(  8,  2)- 

.  19970831E-02 

(  8,10) 

.  16276810E-03 

(  9,  2)- 

. 11390000E-01 

(10,10)- 

.  42830000E+00 

(11, 

l) 

. 29999776E+02 

(11,  2)- 

. 60391809E+00 

(11,10)- 

.  19314127E+02 

(12. 

2) 

.  lOOOOOOOE+Ol 

(14,  3) 

. lOOOOOOOE+Ol 

(15,  4) 

.  lOOOOOOOE+Ol 

(16, 

1) 

. 37319721E-01 

(16,  2)- 

. 75127411E-03 

(16,10)- 

.  24026774E-01 

(17, 

6) 

.  lOOOOOOOE+Ol 

(18,10) 

.  lOOOOOOOE+Ol 

(21,13)  . lOOOOOOOE+Ol 
MATRIX  D  IS 

(19.  1)  . lOOOOOOOE+Ol  (20,  1)  . 14062500E-01 
THE  COMMON  ROOTS  ELIMINATED  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  -220.00000  0. 

THE  NUMERATOR  ROOTS  OF  SR00T32  ARE 
NO.  REAL  IMAG.  OMEGA  ZETA 
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1 

-51.000000 

68.000000 

85.000000 

.60000000 

2 

-51.000000 

-68.000000 

85.000000 

.60000000 

3 

-122046.64 

0. 

4 

-168.29727 

0. 

5 

-150.00000 

0. 

6 

-25.365837 

0. 

7 

-6.2892356 

0. 

8 

-.32689340 

0. 

9 

-1.5000000 

0. 

LOW  ORDER  NONZERO 

COEFFICIENT  = 

- .93771483E+21 

THE  DENOMINATOR  ROOTS  OF  SR00T32 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-47.940879 

162.78117 

160.12624 

.29939427 

2 

-47.940879 

-162.78117 

160.12624 

.29939427 

3 

-51.288702 

67.552615 

84.816783 

.60469992 

4 

-51.288702 

-67.552615 

84.816783 

.60469992 

5 

3.1461972 

2.7385314 

4.1711043 

-.75428399 

6 

3.1461972 

-2.7385314 

4.1711043 

-.75428399 

7 

-1599.9998 

0. 

8 

-79.544021 

0. 

9 

-50.114929 

0. 

10 

-5.9243239 

0. 

11 

-1.0664041 

0. 

12 

-170.00000 

0. 

LOW  ORDER  NONZERO 

COEFFICIENT  = 

.48364735E+22 

DEGREE 

OF  NUMERATOR 

OF  SPTF32  IS  9 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

-9 . 377 148295 -i  16E+20  -3 . 704843035743E+21  -2 . T10203577929E+21  -4.72492627S247E+20 
-2 . 36S644402255E+19  -4 . 695048625545E+17  -5 . 210858267483E+15  -2 . 98665864912E+13 
-6 . 596778299719E+10  -538510 . 6893547 

DEGREE  OF  DENOMINATOR  OF  SPTF32  IS  12  (COEFFICIENTS  IN  ASCENDING  ORDER) 

4 . 836473507518E+21  3 . 878304710069E+21  -6 . 79  .'951649868E+20  -1 . 500417076754E+19 

4 . 457877792923E+19  2 . 535107790608E+18  6 . 206314705428E+16  8 . 957164415011E+14 
3 . 29058307049E+12  5 . 007812145866E+10  203857706.4704  461751.5906631  220.0057246298 

BODE  GAIN  =  -.19388400 


In  Step  12  the  frequency  response  with  the  loop  opened  at  Yi  is  computed.  The  printer  output  for 
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this  case  is  not  shown.  However,  the  high  resolution  plot  is  presented  in  Appendix  H.  Note  that  the 
response  as  computed  is  the  negative  of  the  open  loop  frequency  response  normally  used  to  assess 
stability.  If  the  frequency  response  of  -SPTF32  were  computed  instead,  the  180  degree  crossover 
frequency  at  4.7  rad/sec  would  yield  a  gain  margin  of  1,37  db. 

The  results  of  this  benchmark  problem  are  essentially  identical  to  the  results  given  in  Ref.  4. 
To  compare  the  system  eigenvalues  with  those  of  Ref.  4  the  system  eigenvalues  could  have  been 
obtained  with  the  command  BlEIG.  However,  since  the  closed  loop  transfer  function  was  computed 
in  Step  4,  the  eigenvalues  are  equal  to  the  denominator  roots  of  SPTF30  plus  the  three  common 
roots  at  -1600.,  -220.  and  -170.  which  were  eliminated. 
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9.5  Example  18  IEEE  CACSD  Benchmark  Problem  No.  3,  2-Rate 
Model  (automated  analysis  method) 


Solution  of  the  2-rate  sampled-data  model  from  the  IEEE  CACSD  Benchmark  Problem  No.  3  (5]  is 
presented  in  this  example  using  the  LCAP2  automated  analysis  method  based  on  transfer  function 
connection  blocks.  This  automated  method  will  show  the  ease  in  setting  up  the  analysis  to  solve 
for  the  objectives  of  the  benchmark  problem.  The  block  diagram  of  this  problem,  labeled  in  terms 
of  (l)  LCAP2  transfer  function  connection  blocks  and  (2)  LCAP2  SPTFj  and  ZPTF;  transfer 
functions,  is  given  in  Figure  9.6.  This  figure  includes  a  unity  discrete  connection  block  D7  used  to 
define  the  sampled  output  of  Gi  at  the  slower  sampling  rate  and  a  unity  discrete  connection  block 
De  to  be  used  in  defining  an  open  loop  transfer  function. 


Figure  9.6:  Block  Diagram  for  IEEE  Benchmark  2-Rate  Model 

Conventions  defined  by  the  benchmark  problem 

1.  All  samplers  are  ideal.  This  means  that  the  samplers  reach  their  values  instantaneously,  and 
all  of  the  fast  samplers  are  synchronized  with  the  slow  samplers. 

2.  It  is  important  that  the  simulation  protocol  be  defined  so  that  there  is  a  unique  answer.  The 
main  difficulty  b  to  insure  that  no  extra  delays  are  introduced.  Assume  that  there  is  no 
computational  delay.  A  subsystem  with  the  same  number  of  poles  and  zeros,  as  are  most 
in  this  problem,  has  a  direct  connection  between  the  input  and  output.  When  two  or  more 
samplers  coincide,  this  direct  path  must  propagate  through  the  samplers. 
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3.  The  zero-order  hold  (ZOH)  block  updates  at  the  slowest  sampling  rate  and  provides  a  constant 
input  to  the  continuous  system  until  the  next  slow  sampling  time  occurs. 

4.  The  continuous  transfer  function  Gi(s)  and  G2(s)  have  the  same  denominator  and  should  be 
considered  as  representing  a  single  second-order  system  having  one  input  and  two  outputs. 
Do  not  introduce  extra  states  by  treating  them  as  separate  blocks1. 

Problem  statement: 


Generate  the  time  response  to  a  continuous-time  unit  step  input  r(t),  with  zero  initial 
conditions  throughout.  Plot  and  tabulate  the  continuous-time  output  of  c(t)  for  the  in¬ 
terval  0  <  t  <  4.0  seconds.  The  plot  should  use  time  increments  of  at  most  0.02  sec.  The 
values  of  c(t)  should  be  tabulated  for  every  0.5  sec  with  at  least  5  digits. 

1.  Determine  an  equivalent  discrete-time  model  in  state  space  or  transfer  function  form 
for  the  closed  loop  system  based  on  the  basic  sampling  interval  of  0.02  sec.  The 
input  is  to  be  the  sample  values  r(k)  and  the  output  is  c(k),  the  sample  values  of  the 
continuous  output  c(t).  If  a  state  space  model  is  used,  identify  the  states  in  terms 
of  the  states  of  the  transfer  functions  of  the  individual  blocks. 

2.  Give  the  eigenvalues  of  the  A  matrix  of  this  model  (at  least  5  digits).  List  them  in 
order  of  increasing  magnitude. 

3.  Find  the  poles  and  zeros,  after  any  cancellations  have  been  removed,  of  the  transfer 
function  C(z)/R(z). 

Step  c:  Construct  a  model  where  the  inner  feedback  loop  is  broken  between  the  points  «  and 
0.  The  input  is  the  discrete-time  signal  at  a  and  the  output  is  the  signal  at  0,  both  of 
which  are  sampled  at  the  basic  time  interval  of  0.02  sec.  The  input  reference  input  r(k)  is 
identically  zero.  The  outer  feedback  loop  remains  in  place. 

1.  Determine  the  poles  and  zeros  of  the  discrete  transfer  function  from  the  input  at  a 
to  the  output  at  0,  denoted  as  H(z),  after  any  cancellations  have  taken  place. 

2.  Plot  and  tabulate  the  frequency  response  that  is  found  by  evaluating  H(z)  around  the 
upper  half  of  the  unit  circle.  Use  dB  (20  logi0)  for  magnitudes,  degrees  for  phase,  and 
Hertz  for  frequency.  The  plots  should  be  in  Bode  form,  with  200  frequency  points 
running  from  0.01  Hz  to  25  Hz.  (At  the  basic  sampling  interval  of  0.02  sec.,  the 
point  z=-l  corresponds  to  507T  rad/sec  or  25  Hz).  Include  numerical  values  (about 
4  digits)  of  magnitude  and  phase  for  the  frequencies:  0.01,  0.1,  1.0.  and  25  Hz. 

The  system  parameters  and  transfer  functions  are  given  as: 

T1  =  l  /50;  T2  =  1/200 

♦  ★★continuous  transfer  functions 

G[  =  -15  (  s  -f  1.5  )  /  (s**2  4-  6*s  4-  13  ) 

'In  the  solution  of  this  problem  in  Examples  18  and  19,  this  was  not  adhered  to  since  it  is  easier  to  model  the 
probl»m  as  two  different  transfer  functions  with  the  same  denominator.  Extra  states  generated  will  not  present  any 
computational  difficulties  for  this  problem;  it  will  though,  generate  common  roots  in  transfer  functions  which  will  be 
automatically  eliminated  by  the  program. 


Step  A: 


Step  B: 
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G2  =  (  -  .l*s  +  9)  /  (  s**2  +  6*s  +  13  ) 
♦  ♦♦discrete  transfer  functions 
G3  =  .2625  (  z  -  .9048  )  /  (z  -1  ) 

G4  =  1.7  (z  -  .9608  )  /  (  z  -  .6667  ) 

G5  =  1.035  (  z  -  .9324  )  /  (  z  -  1  ) 

G6  =  .1564  (  z  +  1  )  /  (  z  -  .6873  ) 

Gr  =  .0362  (  z  t  !)/(*-  .9277  ) 


The  first  part  of  this  benchmark  problem  is  to  compute  the  time  response  at  the  output  of  the  con¬ 
tinuous  block  Gi(s).  Unity  discrete  connection  block  C7  connected  to  the  output  of  the  continuous 
block  is  used  as  a  fictitious  or  mathematical  sampler  to  define  the  sampled  output  at  the  slower 
sampling  rate.  Thus,  the  time  response  from  block  Di  to  D7  is  to  be  computed.  Two  different 
methods  will  be  used  to  compute  this  response.  The  first  uses  command  ZTIME  and  the  second 
uses  command  B2TIME. 

Solution  to  the  first  part  of  this  benchmark  problem  will  solve  the  second  part  of  the  problem 
since  both  a  state  space  and  a  transfer  function  form  for  the  closed  loop  transfer  function  will  be 
computed  along  with  the  eigenvalues,  poles,  and  zeros. 

The  last  part  of  this  benchmark  problem  is  to  compute  the  open  loop1  frequency  response  of  the 
system  by  breaking  the  loop  between  points  a  and  (3. 

The  following  steps  were  used  to  solve  this  benchmark  problem: 

1.  Load  in  s  plane  transfer  functions 

2.  Load  in  z  plane  transfer  functions 

3.  Enter  in  sampling  periods 

4.  Define  and  connect  transfer  function  blocks  for  closed  loop  configuration 

5.  Compute  closed  loop  transfer  function 

6.  Compute  closed  loop  time  response  using  command  ZTIME 

7.  Compute  closed  loop  time  response  using  command  B2TIME 

8.  Change  connection  blocks  for  open  loop  configuration 

9.  Compute  open  loop  transfer  function 

10.  Compute  open  loop  frequency  response 

Since  there  are  many  steps  involved  in  the  solution  of  this  problem,  the  PRECMP  precompiler  will 
be  used.  The  PRECMP  code  is: 


'The  open  loop  transfer  function  as  defined  by  Ref.  5  is  not  the  usual  definition  of  an  open  loop  transfer  function 
used  for  stability  analysis.  To  properly  read  out  gain  and  phase  margins  at  the  crossover  frequencies,  the  negative  of 
the  open  loop  transfer  function  defined  by  this  benchmark  problem  would  be  used  instead. 
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C  IEEE  CACSD  BENCHMARK  PROBLEM  NO.  3,  2-RATE  MODEL 
C 

C  1.  ****  LOAD  IN  S  PLANE  TRANSFER  FUNCTIONS  **** 

•POLYN  1  -15*1 . 5  -15 
*POLYD  2  13  6  1 

♦SPLDC  1  !  LOAD  IN  G1(S) 

C 

•POLYN  1  9  -.1 
•POLYD  2  13  6  1 

•SPLDC  2  !  LOAD  IN  G2(S) 

C 

C  2.  ****  LOAD  IN  Z  PLANE  TRANSFER  FUNCTIONS  **** 

•POLYN  1  -.2625*. 9048  .2625 
•POLYD  1-11 

•ZPLDC  3  !  LOAD  IN  G3(Z) 

C 

•POLYN  1  -1.7*. 9608  1.7 
•POLYD  1  -.6667  1 

•ZPLDC  4  !  LOAD  IN  G4(Z) 

C 

•POLYN  1  -1.035*. 9324  1.035 
•POLYD  1-11 

•ZPLDC  5  !  LOAD  IN  G5(Z) 

C 

•POLYN  1  .1564  .1564 
•POLYD  1  -.6873  1 

•ZPLDC  6  !  LOAD  IN  G6(Z) 

C 

•POLYN  1  .0362  .0362 
•POLYD  1  -.9277  1 

•ZPLDC  7  !  LOAD  IN  G7(Z) 

C 

C  3.  ****  ENTER  SAMPLING  PERIODS  ***• 

Tl=l . /SO . 

T2=l./200. 

C 

C  4.  DEFINE  &NP  CONNECT  TRANSFER  FUNCTION  BLOCKS  FOR  CLOSED 

C  •••«  LOOP  CONFIGURATION 

DELAY=0 

C  NOTE:  DELAY  OPTION  NOT  IMPLEMENTED  YET 
C 

•B2INIT  ’IEEE  BENCHMARK  PROBLEM  NO.  3,  2-RATE,  CLOSED  LOOP’  .. 

’NEW’  2  7  1 
C 

•IXSIN  1 

INDX=1 
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ISPTF=1 

NYCIH=0 

NXSIN=1 

♦B2CEQ  ’G1  BLOCK’  IHDX  ISPTF  DELAY  0  NYCIN  NXSIN 
C 

♦IXSIN  1 

♦B2CEQ  ’ G2  BLOCK’  2  2  DELAY  001 
C 

♦B2DEQ  ’ G3  BLOCK’  1  3  T1  DELAY  0000 
C 

♦IYDIH  4 

*B2DEQ  ’G4  BLOCK’  2  4  T1  DELAY  0010 
C 

♦IYDIH  5 

♦B2DEQ  ’ G5  BLOCK’  3  5  T1  DELAY  0010 
C 

♦IYCIN  1 

♦B2DEQ  ’G6  BLOCK’  4  6  T2  DELAY  0100 
C 

♦IYCIH  2 

♦B2DEQ  ’G7  BLOCK’  5  7  T2  DELAY  0100 
C 

♦IYDIH  -1  2  -3 

♦B2DEQ  ’SUMMER  BLOCK’  6  0  T1  DELAY  0100 
C 

♦IYCIH  1 

♦B2DEQ  ’T1  SAMPLER  FOR  G1(S)  BLOCK’  7  0  T1  DELAY  0100 
C 

♦IYDIH  6 

*B2SEq  ’ ZOH  BLOCK’  1  T1  DELAY  1  0 
C 

♦B2EHD 

C 

C  ♦♦♦♦  COHHECTIOH  OF  TRAHSFER  FUHCTIOH  BLOCKS  COMPLETED  ♦♦♦♦ 

C 

C  5.  ♦**♦  COMPUTE  CLOSED  LOOP  T.F .  FROM  D1  TO  BLOCK  D7  ♦♦♦♦ 

UDIH=1 
UMAGH=1 . 

YD0UT=7 

PRIHT* , ’ D1  TO  D7  CLOSED  LOOP  T.F.  HILL  BE  IH  ZPTF20 ’ 

C  SET  PRHMTRX  FOR  PRIHTOUT  OF  COMPUTED  STATE  SPACE  MATRICES 

PRHMTRX=1 
♦B2TF  20 
C 

C  6.  ♦♦♦♦  COMPUTE  CLOSED  LOOP  TIME  RESPOHSE  ♦♦♦♦ 

TITLE1=’ EXAMPLE  18,  IEEE  BENCHMARK  HO.  3,  2-RATE  MODEL’ 
TITLE2=’ CLOSED  LOOP  RESPOHSE  BY  ZTIME  COMMAND ’ 

SAMPT=T1 
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TMAGN=1 . 

TEND=4. 

HRDCPY=1 
CALL  ZTIHE(20) 

C 

C  7.  ****  COMPUTE  CLOSED  LOOP  TIME  RESPONSE  **** 

TITLE2=’ CLOSED  LOOP  RESPONSE  BY  B2TIME  COMMAND' 

CALL  B2TIMEQ 
C 

C  8.  ****  CHANGE  CONNECTION  DATA  FOR  OPEN  LOOP  CONFIGURATION  **** 

♦B2INIT  ’IEEE  BENCHMARK  PROBLEM  NO. 3,  2-RATE,  OPEN  INNER  LOOP’  .. 

'OLD'  2  7  1  !  NOTE  USE  OF  ’OLD’  FOR  CHANGING  DATA 
♦IYDIN  -1  -3 

♦B2DEQ  ’SUMMER  BLOCK’  6  0  T1  DELAY  0020 

♦B2END 

C 

C  ****  CONNECTION  OF  TRANSFER  FUNCTION  BLOCKS  COMPLETED  **** 

C 

c  9.  ****  COMPUTE  OPEN  LOOP  TRANSFER  FUNCTION  **** 

UDIN=6 
UMAGN=1 . 

YD0UT=2 

PRINT*, ’OPEN  INNER  LOOP  T.F.  WILL  BE  IN  ZPTF21 ’ 

*B2TF  21 
C 

C  10.  ****  COMPUTE  OPEN  LOOP  FREQUENCY  RESPONSE  **** 

N0MEGA=4 

♦OMEGA  .01  .1  1.  25. 

RAD=0 

FNIC0=1 

FB0DE=1 

SAMPT=T1 

CYCLE=4 

TITLE2= ’ OPEN  LOOP  FREQUENCY  RESPONSE  WITH  COMMAND  ZFREQ ’ 

CALL  ZFREQ (21) 

C 

C  11.  ****  COMPUTE  OPEN  LOOP  FREQUENCY  RESPONSE  **** 

TIi:E2=’0PEN  LOOP  FREQUENCY  RESPONSE  WITH  COMMAND  B2FREQ ’ 

CALL  B2FREQO 


L 

Since  the  complete  output  of  the  example  is  too  long  to  be  included  in  this  report,  only  a  portion 
of  it  will  be  presented.  The  output  from  Step  5  for  the  command  B2TF  is: 


D1  TO  D7  CLOSED  LOOP  T.F.  WILL  BE  IN  ZPTF20 


9-40 


IEEE  BENCHMARK  PROBLEM  NO.  3,  2-RATE,  CLOSED  LOOP 
NUMBER  OF  CONTINUOUS  BLOCKS  =  2 

BLOCK  DESCRIPTION 

Cl  G1  BLOCK 

C2  G2  BLOCK 

BLOCK  TRANSFER  FUNCTION  INPUTS  FROM  BLOCKS 

Cl  SPTF1  SI 

C2  SPTF2  SI 


NUMBER  OF  DISCRETE  BLOCKS  7 
BLOCK  DESCRIPTION 

D1  G3  BLOCK 

D2  G4  BLOCK 

D3  G5  BLOCK 

D4  G6  BLOCK 

D5  G7  BLOCK 

D6  SUMMER  BLOCK 

D7  T1  SAMPLER  FOR  G1  BLOCK 

BLOCK  TRANSFER  FUNCTION  SAMPLING  PERIOD  INPUTS  FROM  BLOCKS 


D1 

ZPTF3 

. 20000E-01 

HAS  NO  INPUT 

D2 

ZPTF4 

.  20000E-01 

D4 

D3 

ZPTF5 

. 20COOE-O1 

D5 

D4 

ZPTF6 

. 50000E-02 

Cl 

D5 

ZPTF7 

. 50000E-02 

C2 

D6 

ZPTFO 

. 20000E-01  - 

-D1  ,  D2  , -D3 

D7 

ZPTFO 

. 20000E-01 

Cl 

NUMBER 

OF  SAMPLE-HOLD  BLOCKS 

=  1 

BLOCK 

DESCRIPTION 

SI 

ZOH  BLOCK 

BLOCK 

SAMPLING  PERIOD 

INPUTS 

FROM  BLOCKS 

SI 

. 20000E-01 

D6 
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INPUT  IS  CONNECTED  TO  BLOCK  D1 
MAGNITUDE  OF  U  =  .lOOOOE+Ol 
BLOCK  D7  IS  THE  OUTPUT 


********************************************************************** 

*  B2TF  -  BLOCK2:  FIND  TRANSFER  FUNCTION  FROM  D1  TO  D7  * 

*  AND  STORE  IN  ZPTF20  * 

♦♦♦I******************************************************************* 

BASIC  SAMPLING  PERIOD  COMPUTED  =  .50000E-02 

LCM  SAMPLING  PERIOD  COMPUTED  =  .20000E-01 

TOTAL  NUMBER  OF  TIME  SEGMENTS  COMPUTED  =  4 

************************************4*********************************,***** 

*  SEGMENT  START  * 

*  NUMBER  TIME  DT(1)  DT(2)  DT(3)  DT(4)  DT(5)  DT(6)  DT(7)  * 

*  ST(1)  * 

444*4****444444444444**4444444444444444444******4444*4444*44444444444444*444 


1 

. OOOOOE+OO 

ON 

ON 

ON 

ON 

ON 

ON 

ON 

ON 

2 

. 50000E-02 

OFF 

OFF 

OFF 

OFF 

ON 

ON 

OFF 

OFF 

3 

. 10000E-01 

OFF 

OFF 

OFF 

OFF 

ON 

ON 

OFF 

OFF 

4 

.  15000E-01 

OFF 

OFF 

OFF 

OFF 

ON 

ON 

OFF 

OFF 

COMPUTED  STATE  SPACE  REPRESENTATION  IS: 

X(K+1)  =  PSI  *  X (K)  +  B  *  U(K) 

7(K)  =  C  *  X(K)  +  D  *  U(K) 

WHERE  X(  1:  4)  ARE  THE  CONTINUOUS  STATES 
X(  5:  9)  ARE  THE  DISCRETE  STATES 
1(10:10)  ARE  THE  SAMPLE-HOLD  STATES 
Y  IS  THE  OUTPUT  VECTOR  OF  LENGTH  7 

C  =  [FD  CD  HD]  AND  THE  LCM  SAMPLING  PERIOD  =  . 20000000E-01 


(THE  I-TH  ELEMENT  OF  Y 

MATRIX  PSI  IS 

(  1,  1)  . 80827203E+00  ( 

(  1.  5)  . 28677744E+00  ( 

(  1,  8) - . 48752165E+00  ( 
(  2,  2)  . 99750203E+00  ( 

(  2.  6) - . 4121S193E+00  ( 

(  2.  9)  . 42657725E+00  ( 

(  3,  4)  . 18830238E-01  ( 

(  3,  7)  . 15366118E-03  ( 


IS  TH^  OUTPUT  OF  THE  I-TH 


1,  2)  . 18830268E-01  (  1, 
1,  6) - . 28677744E+00  (  1, 

1,  9)  . 29681465E+00  (  2, 

2,  3)  . 16442096E-01  (  2, 

2,  7)  . 41215193E+00  (  2, 

3,  1) - . 40855436E-04  (  3. 

3,  E)  . 15366118E-03  (  3, 

3,  8) - . 26 12240 IE- 03  (  3, 


DISCRETE  CONNECTION  BLOCK) 


3)  . 10744690E-01 

7)  . 28677744E+00 
1 ) - . 35437644E+00 

5)  .41215193E+00 

8)  - . 70065829E+00 
3)  . 88452617E+00 

6) - . 153661 18E-03 

9)  . 15903932E-03 
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( 

4, 

1) 

.  47884564E-01 

( 

4. 

3)- 

. 25154124E+00 

( 

4. 

4) 

. 99750203E+00 

( 

4, 

5)- 

.  18009841E+00 

( 

4. 

6) 

. 18009841E+00 

( 

4. 

7)- 

. 18009841E+00 

( 

4. 

8) 

. 30616729E+00 

( 

4, 

9)" 

. 18640185E+00 

( 

5, 

5) 

. 10000000E+01 

( 

6, 

n- 

.  78195308E-01 

( 

6, 

6) 

. 66670000E+00 

( 

6, 

8)- 

.49997000E+00 

( 

7, 

3) 

. 25327692E-02 

( 

7, 

7) 

. 10000000E+01 

( 

7. 

9) 

. 69966000E-01 

( 

8, 

i) 

. 59335504E+00 

( 

8, 

2) 

. 61S76808E-02 

( 

8, 

3) 

. 34937286E-02 

( 

8, 

5) 

. 93248155E-01 

( 

8, 

6)- 

.93248155E-01 

( 

8. 

7) 

. 93248155E-01 

( 

8. 

8) 

. 64622220E-01 

( 

8, 

9) 

.96511840E-01 

( 

9, 

n- 

. 23668806E-04 

( 

9. 

3) 

. 23859806E+00 

( 

9. 

4) 

. 1924S406E-02 

( 

9. 

5) 

.88644523E-04 

( 

9. 

6)- 

. P8644523E-04 

( 

9, 

7) 

. 88644523E-04 

( 

9, 

8)- 

. 1506956SE-G3 

( 

9. 

9) 

. 74077108E+00 

(10, 

1) 

. 26S88000E+00 

(10, 

3)- 

. 37467000E-01 

Cio, 

5)- 

. 10000000E+01 

(10, 

6) 

. 10000000E+01 

(10, 

7)- 

. 10000000E+01 

(10, 

8) 

. 17000000E+01 

(10, 

9)- 

. 10350000E+01 

MATRIX  B 

IS 

( 

1. 

1) 

. 75279078E-01 

( 

2, 

1) 

. 10818988E+00 

( 

3, 

1) 

. 40336061E-04 

( 

4. 

n- 

. 47276832E-01 

( 

s. 

1) 

. 24990000E-01 

( 

8, 

1) 

. 24477641E-01 

( 

9. 

1) 

. 23269187E-04 

(10, 

n- 

. 26250000E+00 

MATRIX  CD  IS 

( 

1, 

1) 

. 10000000E+01 

( 

2, 

2) 

. 10000000E+01 

( 

2, 

4) 

. 17000000E+01 

( 

3, 

3) 

. 10000000E+01 

( 

3. 

5) 

. 10350000E+01 

( 

4, 

4) 

. 10000000E+01 

( 

5. 

5) 

. 10000000E+01 

( 

6. 

D- 

. 10000000E+01 

( 

6, 

2) 

. 10000000E+01 

( 

6, 

3)- 

. 10000000E+01 

( 

6, 

4) 

. 17000000E+01 

( 

6, 

5)- 

. 10350000E+01 

MATRIX  FD  IS 

( 

2. 

1) 

. 26588000E+00 

( 

3. 

3) 

.37467000E-01 

( 

4, 

1) 

. 15640000E+00 

( 

5. 

3) 

. 36200000E-01 

( 

6, 

1) 

.26688000E+00 

c 

6, 

3)- 

. 37467000E-01 

( 

'  • 

1) 

. 10000000E+01 

MATRIX  HD  IS 

ALL  F.LFMENTS  ARE  ZERO 
MATRIX  D  IS 


(  1,  1)  . 26250000E+00  (  6,  1) - . 26250000E+00 
THE  COMMON  ROOTS  ELIMINATED  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.94101122 

. 37660537E-01 

.94176453 

-.99920011 

2 

.94101122 

- .  37660537E-01 

.94176453 

-.99920011 

3 

1.0000000 

0. 

4 

0. 

0. 

THE  NUMERATOR  ROOTS 

OF  ZR00T20  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.666  '0000 

0. 

2 

.22314408 

0. 

3 

.74067933 

0. 
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4 

5 


.90480000 

.97043947 


0. 

0. 


LOW 

ORDER  NON-ZERO  COEFFICIENT  = 

.  64599038E-02 

THE 

DENOMINATOR  ROOTS 

OF  ZR00T20 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.31254440 

.43951523 

.53931219 

-.57952407 

2 

.31254440 

-.43951523 

.53931219 

-.57952407 

3 

.98029993 

. 39467762E-01 

.98109411 

-.99919051 

4 

.98029993 

- . 39467762E-01 

.98109411 

-.99919051 

5 

.73944478 

0. 

6 

.95273968 

0. 

LOW  ORDER  NON-ZERO  COEFFICIENT  =  -.17493088 

DEGREE  OF  NUMERATOR  OF  ZPTF20  IS  5  (COEFFICIENTS  IN  ASCENDING  ORDER) 
.006459903823865  -.06115671029628  .2040925049616  -.3167094636213  .2340677016674 
-.0667665525175 

DEGREE  OF  DENOMINATOR  OF  ZPTF20  IS  6  (COEFFICIENTS  IN  ASCENDING  ORDER) 
-.1749308767793  1.152441778427  -3.556113404879  6.37552997883  -6.704154278874 
3.794133091762  -.8869204367171 


The  above  output  for  the  command  B2TF  summarizes  all  of  the  connection  blocks  so  that  the 
analyst  can  easily  verify  that  the  system  is  correctly  modeled.  From  the  sampling  periods  entered 
for  each  D;  and  S;  block,  the  basic  sampling  period  and  the  LCM  sampling  period  are  comput’d  and 
printed  out.  The  discrete  time  segment  table  used  in  computing  the  transition  matrix  is  printed 
out  to  show  the  analyst  which  sampled  blocks  are  on  or  off  at  each  of  the  discrete  times.  The 
computed  state  space  matrices  are  printed  out  since  the  parameter  PRNMTRX  was  set  to  1.  Four 
continuous  states,  five  discrete  states,  and  one  sample-hold  state  were  generated.  The  output  of  C! 
and  C2  are  X(l)  and  X(3),  respectively.  The  output  of  each  Dj  block  is  computed  using  matrices 
C  and  D.  For  example: 

•  The  output  of  discrete  connection  block  D3  is  the  sum  of  CD(3,3)*X(7)  and  CD(3,5)»  X(9). 
The  second  term  is  due  to  the  direct  connection  from  D5  to  D3  since  the  order  of  the  numer¬ 
ator  and  denominator  of  G5  are  equal. 

•  The  output  of  discrete  connection  block  D7  is  FD(7,1)*X(1)  which  is  is  the  sampled  output 
of  *he  continuous  state  X(l). 

The  computed  closed  loop  transfer  function  is  stored  in  SPTF20-  This  transfer  function  is  used  in 
Step  6  to  compute  the  step  response  by  recursive  evaluation  of  a  difference  equation.  The  response 
at  every  .5  sec  is 


Time 

c(t) 

.00000 

.00000 

.50000 

.88987 

1.0000 

1.2651 

_ _j 

1.5000 

1.1570 

2.0000 

.92905 

2.5000 

.81584 

3.0000 

.82736 

3.5000 

.87830 

4.0000 

.90761 

final  value 

.89170 

which  is  identical  to  the  results  given  in  Ref.  5. 

The  low  resolution  printer  plot  is  not  presented.  However,  the  high  resolution  plot  is  presented  in 
Appendix  H. 

The  step  response  computed  by  the  state  space  method  in  Step  7  is  identical  to  the  results  in  Step 
G.  The  computed  state  space  matrices  are  the  same  as  the  ones  computed  in  Step  5. 

After  the  loop  is  opened  in  Step  8,  the  command  B2TF  is  used  to  compute  the  open  loop  transfer 
function.  Since  the  format  of  the  output  is  the  same  as  above,  only  the  final  result  of  this  open 
loop  transfer  function  is  presented  next: 


INPUT  IS  CONNECTED  TO  BLOCK  D6 
MAGNITUDE  OF  U  =  -.10000E+01 
BLOCK  D2  IS  THE  OUTPUT 

********************************************************************** 

*  B2TF  -  BL0CK2 :  FIND  TRANSFER  FUNCTION  FROM  D6  TO  D2  * 

*  AND  STORE  IN  ZPTF21  * 

********************************************************************** 

BASIC  SAMPLING  PERIOD  COMPUTED  =  .50000E-02 

FUNDAMENTAL  SAMPLING  (LCM)  PERIOP  COMPUTED  =  .20000E-01 

TOTAL  NUMBER  OF  TIME  SEGMENTS  COMPUTED  =  4 

**************************************************************************** 

*  SEGMENT  START  * 

*  NUMBER  TIME  DT(l)  DT(2)  DT(3)  DT(4)  DT(5)  DT(6)  DT(7)  * 

*  ST(l)  * 

**************************************************************************** 


1 

. OOOOOE+OO 

ON 

ON 

ON 

ON 

ON 

ON 

ON 

ON 

2 

. 50000E-02 

OFF 

OFF 

OFF 

OFF 

ON 

ON 

OFF 

OFF 

3 

. 10000E-01 

OFF 

OFF 

OFF 

OFF 

ON 

ON 

OFF 

OFF 

4 

. 15000E-01 

OFF 

OFF 

OFF 

ON 

ON 

OFF 

OFF 

9  -  45 


OFF 


COMPUTED  STATE  SPACE  REPRESENTATION  IS: 


XCX+l)  =  PSI  *  X(X)  +  B  *  U(K) 
Y (K)  =  C  *  xoo  +  D  *  U(K) 


WHERE  X(  1:  4)  ARE  THE  CONTINUOUS  STATES 
X(  S:  9)  ARE  THE  DISCRETE  STATES 
X( 10 : 10)  ARE  THE  SAMPLE-HOLD  STATES 
Y  IS  THE  OUTPUT  VECTOR  OF  LENGTH  7 

C  =  [FD  CD  HD]  AND  THE  LCM  SAMPLING  PERIOD  =  . 20000000E-01 

(THE  I-TH  ELEMENT  OF  Y  IS  THE  OUTPUT  OF  THE  I-TH  DISCRETE  CONNECTION  BLOCK) 


MATRIX  PSI  IS 

(  1. 

1) 

.  88452042E+00 

( 

1, 

2) 

. 18830268E-01 

( 

1, 

3) 

. 10744690E-01 

(  1. 

5) 

•28677744E+00 

( 

1. 

7) 

. 28677744E+00 

( 

1. 

9) 

. 29681465E+00 

(  2, 

D- 

. 24479349E+00 

( 

2. 

2) 

. 997S0203E+00 

( 

2, 

3) 

. 1S442096E-01 

(  2, 

5) 

.41216193E+00 

( 

2. 

7) 

•4121S193E+00 

( 

2, 

9) 

.426S7725E+00 

(  3. 

3) 

. 884S2617E+00 

( 

3. 

4) 

. 18830268E-01 

( 

3, 

S) 

. 1S366118E-03 

(  3, 

7) 

. 15366118E-03 

( 

3, 

9) 

. 15903932E-03 

( 

4. 

3)- 

. 25154124E+00 

(  4. 

4) 

.99750203E+00 

( 

4, 

5)- 

. 18009841E+00 

( 

4. 

7)- 

. 18009841E+00 

(  4. 

9)- 

. 18640185E+00 

( 

5. 

5) 

. 10000000E+01 

( 

6, 

D- 

. 78195308E-01 

(  6, 

6) 

. 66670000E+00 

( 

6. 

8)- 

, 49997000E+00 

( 

7, 

3) 

.2S327692E-02 

(  7, 

7) 

. 10000000E+01 

( 

7. 

9) 

.69966000E-01 

( 

8. 

1) 

.61814786E+00 

(  8, 

2) 

. 61576808E-02 

( 

8, 

3) 

. 34937286E-02 

( 

8, 

5) 

. 93248155E-01 

(  8, 

7) 

. 93248155E-01 

( 

8. 

8) 

. 22314408E+00 

( 

8, 

9) 

. 96511840E-01 

(  9. 

3) 

. 23859806E+00 

( 

9. 

4) 

. 19245406E-02 

( 

9. 

5) 

. 88644523E-04 

(  9. 

7) 

.  8864“1523E-04 

( 

9, 

9) 

. 74077 108E+00 

(10, 

3)- 

. 37467000E-01 

(10, 

5)- 

. 10000000E+01 

(: 

10, 

7)- 

. 10000000E+01 

(10, 

9)- 

. 10350000E+01 

MATRIX  B 

IS 

(  1. 

D- 

. 28677744E+00 

( 

2. 

D- 

. 41215193E+00 

( 

3, 

D- 

. 15366118E-03 

(  4, 

1) 

. 18009841E+00 

( 

8, 

1>- 

. 9324815SE-01 

( 

9, 

D- 

.8864AR23E-04 

(10. 

1) 

. 10000000E+01 

MATRIX  CD  IS 

(  1. 

1) 

. 10000000E+01 

( 

2, 

2) 

. 10000000E+01 

( 

2, 

4) 

. 17000000E+01 

(  3, 

3) 

. 10000000E+01 

( 

3, 

5) 

. 10350000E+01 

( 

4, 

4) 

. 10000000E+01 

(  5. 

5) 

. 10000000E+01 

( 

6, 

n- 

. 10000000E+01 

( 

6. 

3)- 

. 10000000E+01 

(  6. 

5)- 

. 10350000E+01 

MATRIX  FD  IS 

(  2, 

1) 

. 26E88000E+00 

( 

3, 

3) 

. 37467000E-01 

( 

4. 

1) 

. 15640000E+00 

(  6. 

3) 

. 36200000E-01 

( 

6, 

3)- 

. 37467000E-01 

( 

7, 

1) 

. 10000000E+01 

MATRIX  HD  IS 

ALL  1 

ELEMENTS  ARE  ZERO 

MATRIX  D 

IS 
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(  6,  1)  . 10000000E+01 


THE  COMMON  ROOTS  ELIMINATED  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.94101122 

. 37660537E-01 

.94176453 

-.99920011 

2 

.94101122 

- . 37660537E-01 

.94176463 

-.99920011 

3 

1.0000000 

0. 

4 

0. 

0. 

THE 

NUMERATOR  ROOTS 

OF  ZR00T21  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.74067933 

0. 

2 

-.61403003 

0. 

3 

.96080000 

0. 

4 

.97044501 

0. 

5 

1.0000000 

0. 

LOW 

ORDER  NON-ZERO 

COEFFICIENT  = 

. 88298126E-01 

THE 

DENOMINATOR  ROOTS  OF  ZR00T21 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.97235235 

.61401444E-01 

.97428909 

-.99801215 

2 

.97235235 

- .61401444E-01 

.97428909 

-.99801215 

3 

.66670000 

0. 

4 

.22314408 

0. 

5 

.72805531 

0. 

6 

.95003926 

0. 

LOW 

ORDER  NON-ZERO 

COEFFICIENT  = 

- . 86632750E-01 

DEGREE 

OF  NUMERATOR 

OF 

ZPTF21  IS  5 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

.08829812630519  -.2465973747648  .007921968700923  .5788772433174  -.6367224954357 
.208222531877 

DEGREE  OF  DENOMINATOR  OF  ZPTF21  IS  6  (COEFFICIENTS  IN  ASCENDING  ORDER) 
-.08663275047412  .9058444036621  -3.548191436178  6.954407222147  -7.340876774309 
4.002355623639  -.8869204367171 

I _ 
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In  Step  10  the  open  loop  frequency  response  is  computed1.  A  portion  of  the  output  from  this  step 
is  given  below  at  0.01,  0.1,  1.0.,  and  25.  Hz.  The  low  resolution  printer  plots  are  not  presented. 
However,  the  high  resolution  plots  are  presented  in  Appendix  H. 


1 - 

************************************************************ 

- 1 

*  ZFREQ  -  FREQUENCY  RESPONSE 

OF  Z-PLANE  TRANSFER 

* 

*  FUNCTION  21 

* 

************************************************************ 

•  SAMPLING  PERIOD 

=  . 2000E- 

01 

AUTOMATIC  FREQUENCY  MODE 

IF  FAUTC 

.NE.O,  FAUTO 

=  1.000 

N0MEGA  =  4.000 

OMEGA  = 

. 1000E- 

01,  .1000 

,  1.000 

,25.00 

OMEGA  ZREAL 

ZIMAG 

REAL 

IMAGINARY 

DB 

PHASE 

PHASE 

HZ 

MARGIN 

. 1000E-01  1.000 

.001 

272E-03 

- . 898E-02 

-40.935 

-88.26 

91.74 

. 1300E-01  1.000 

.  002 

4C0E-03 

- . 117E-01 

-38.648 

-87.74 

92.26 

. 9600E-01  1.000 

.012 

251E-01 

-.931E-01 

-20.317 

-74.90 

105.10 

A 

.1000  1.000 

.013  .273E-01 

- .976E-01 

-19.884 

-74.40 

106.60 

• 

.  1240  1 . 000 

.016 

419E-01 

- . 127E+00 

-17.495 

-71.71 

108.29 

.9498  .993 

.119  -. 

170E+01 

. 270E-07 

4.618 

-180.00 

.00 

1.000  .992 

.125  -. 

166E+01 

. 933E-01 

4.413 

-183.22 

-3.22 

1.256  .988 

.157  -. 

146E+01 

.411E+00 

3.596 

-195.75 

-15.75 

24.44  - . 998 

.071 

459E-01 

- . 373E-02 

-26.731 

-4.64 

175.36 

26.00  -1.000 

1 _ 

.000 

456E-01 

- . 584E- 15 

-26.828 

.00 

180.00 

1 

1  The  results  of  this  benchmark  problem 

are  identical  to  the  results 

given  in 

Ref.  5. 

I  To  compare  the  system  eigenvalues  with  those  in  Ref. 

5,  the  system  eigenvalues  could  have  been 

I  computed  with  the  command  B2EIG.  However,  since  the  closed  loop  transfer  function  was  computed 

in  Step  5,  the  eigenvalues  are 

equal  to  the  denominator  roots  of  ZPTF20 

plus  the  four  common 

roots  at  (.941011  ±  .0376605) 

,  1.00000  and  0,0  which  were  eliminated. 

‘The  frequency  response  could 

also  have  been  computed  with  command  B2FREQ 

which  would  have  yielded 

identical  results. 

• 
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9.6  Example  19  IEEE  CACSD  Benchmark  Problem  No.  3,  2-Rate 
Model  (classical  multirate  transform  method) 

Solution  of  the  2-rate  sampled-data  model  from  the  IEEE  CACSD  Benchmark  Problem  No.  3  [5] 
is  presented  in  this  example  using  classical  multirate  transform  methods.  This  method  of  analysis 
is  based  on  the  block  diagram  reduction  method  in  which  fast  rate  transforms  are  converted  to  the 
slowest  sampling  rate.  The  block  diagram  of  this  problem,  labeled  in  terms  of  the  LCAP2  SPTF; 
and  ZPTFj  transfer  functions,  is  given  in  Figure  9.7. 


Figure  9.7:  Block  Diagram  for  IEEE  Benchmark  2-Rate  Model 

Problem  statement,  system  parameters,  and  transfer  functions  were  previously  stated  in  Example 
18. 

The  first  objective  of  this  benchmark  problem  is  to  compute  the  time  rt._  nse  at  the  output  of 
the  continuous  block  G1(s).  Since  the  output  is  to  be  plotted  every  0.02  sec,  which  is  equal  to 
the  sampling  period  Tj,  compute  the  z  transform  (at  Ti)  between  r(k)  and  the  sampled  output  of 
Gi(s).  The  inverse  z  transform  of  this  transfer  function  will  yield  the  desired  time  response.  Note 
that  the  system  as  stated  in  [5]  does  not  have  a  sampler  at  the  slower  sampling  rate  at  the  output 
of  Gi(3).  This  is  a  fictitious  or  mathematical  sampler  used  to  obtain  the  response  of  a  continuous 
variable  at  the  slower  sampling  times. 
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The  last  part  of  this  benchmark  problem  is  to  compute  the  open  loop1  frequency  response  of  the 
system  by  breaking  the  loop  between  points  a  and  0. 

A  change  in  notation  for  defining  transforms  with  different  sampling  periods  will  be  made  so  that 
it  will  be  more  explicit  and  also  consistent  with  that  used  by  LCAP2  commands.  The  sampling 
period  of  the  slowest  sampler  will  be  denoted  by  T  so  that  the  z  transform  of  a  continuous  transform 
G(s)  is  denoted  by 


Zt{G(s)}  -  Gt(z) 

If  G(s)  is  sampled  at  a  rate  n  (an  integer)  times  faster,  the  faster  rate  z  transform  of  G(s)  is  denoted 
by 

ZT/n{G(s)}  =  GT'n(zn) 

where  zn  =  [z]1/”  since  z  =  e‘T  and  zn  =  e,T/n. 

The  first  step  in  simplifying  the  block  diagram  is  to  compute  the  z  transforms  from  er(z)  to 
the  output  of  Gj(s)  and  Gj(s)  at  the  faster  sampling  rate.  Applying  the  slow-to-fast  multirate 
relationship 


CT'n(zn)  =  2T/n{G(s)}*ET(z) 


to  the  following  system 


Cr/n(zn) 


ZT/n{  G(s)} 


the  transfer  function  between  tT( z)  and  the  output  of  Gi(s)  at  the  faster  sampling  rate  is  given  by 


G[/4(z4)  =  ZT^{1~— —  Gxis)}  =  G,(s)} 

s  s 

which  can  be  implemented  with  command  SZMRX.  The  arguments  of  SZMRX  will  be  selected 
so  that  the  resulting  z  transform  will  be  stored  in  ZPTFi-  Similarly,  the  transfer  function  from 
tT(z)  to  the  output  of  G2(s)  at  the  faster  sampling  rate  will  be  computed  and  stored  in  ZPTF2- 
Figure  9.7  can  now  be  redrawn  in  terms  of  slow  and  fast  rate  z  transforms  as  shown  in  Figure  9.8. 

The  next  step  in  simplifying  the  block  diagram  is  to  transform  the  fast  rate  z  transforms  to  the 
slower  rate.  First  compute  the  products 

'The  open  loop  transfer  function  as  defined  by  Ref.  5  is  not  the  usual  definition  of  an  open  loop  transfer  function 
used  for  stability  analysis.  To  properly  read  out  gain  and  phase  margins  at  the  crossover  frequencies,  the  negative  of 
the  open  loop  transfer  function  defined  by  th's  benchmark  problem  would  be  used  instead. 
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Gfta)  g£/4(z4)  G^/4(z4) 


Figure  9.8:  Slow  and  Fast  Rate  Z  Plane  Transfer  Function  Representation  for  2-Rate  Model 


G™(2j)  =  .  Gf'V*) 

and 

G[/4(z4)  =  G^/4(z4)*G^/4(24) 

and  store  them  into  ZPTFg  and  ZPTFg,  respectively.  Then  using  the  fast-to-slow  multirate 
relationship 

nfc=0 

which  describes  the  following  system 


T/n  T 


the  transfer  function  between  eT(z)  and  the  output  of  Gg  ^4(z4)  at  the  slower  sampling  rate  is  given 
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g5,m  = 

^  k- 0 

which  can  be  computed  with  command  ZMRXFM.  The  arguments  of  ZMRXFM  will  be  selected  so 
that  the  resultant  z  transform  will  be  stored  in  ZPTFio-  Similarly,  the  transfer  function  between 
er(z)  and  the  output  of  Gg'/4(z4)  at  the  slower  sampling  rate  is  computed  and  stored  in  ZPTFn. 
The  block  diagram  can  now  be  simplified  to  the  single  rate  system  in  Figure  9.9. 


By  inspection  from  Figure  9.9,  the  open  loop  transfer  function  with  the  inner  loop  broken  between 
a  and  /3,  as  defined  in  [5],  is 


Gt(z)  *  Gio 
1  +  Gj  *  Gfi 


The  closed  loop  transfer  function  from  rr(z)  to  the  output  of  sampled  at  the  slower  rate  is 

not  readily  determined  from  Figure  9.9  since  the  output  does  not  appear  explicitly.  The  desired 
closed  loop  transfer  function,  though,  can  be  computed  as 


GT(Z) 

RT(z) 


RT(z) 


ZT{ 


1  -  z~ 
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Since  there  are  many  steps  involved  in  the  solution  of  this  problem,  the  PRECMP  precompiler  will 
be  used.  The  PRECMP  code  is: 

r - 1 

C  IEEE  CACSD  BENCHMARK  PROBLEM  NO.  3,  2-RATE  MODEL 
C 

C  1.  ****  LOAD  IN  S  PLANE  TRANSFER  FUNCTIONS  **** 

♦POLYN  1  -15*1. S  -15 
♦POLYD  2  13  6  1 
♦SPLDC  1 
C 

*P0LYN  1  9  -.1 
*P0LYD  2  13  6  1 
*SPLDC  2 
C 

C  2.  ****  LOAD  IN  Z  PLANE  TRANSFER  FUNCTIONS  **** 

♦POLYN  1  -.2625*. 9048  .2625 
♦POLYD  1  -1  1 
*ZPLDC  3 
C 

*POLYN  1  -1.7*. 9608  1.7 
♦POLYD  1  -.6667  1 
*ZPLDC  4 
C 

♦POLYN  1  -1.035*. 9324  1.035 
*POLYD  1-11 
♦ZPLDC  5 
C 

♦POLYN  1  .1564  .1664 
♦POLYD  1  -.6873  1 
♦ZPLDC  6 
C 

♦POLYN  1  .0362  .0362 
♦POLYD  1  -.9277  1 
♦ZPLDC  7 
C 

C  3.  ****  ENTER  SAMPLING  PERIODS  *♦** 

Tl=l/50 . 

T2=l/200 . 

C 


c  4 .  **♦  COMPUTE  SLOW-TO-FAST  MULTIRATE  Z  TRANSFORM  FROM  ETA  TO 

C  G1(S)  AT  FASTER  SAMPLING  RATE 

♦SZMRX  11T20.  14!  IJ  SAMPT  DELAY  ZOH  NTGER 

C  NOTE  USE  OF  COMMENT  CHARACTER  !  IN  ABOVE  STATEMENT 

C 

C  5.  ♦  ♦♦  COMPUTE  SLOW-TO-FAST  MULTIRATE  Z  TRANSFORM  FROM  ETA  TO 

C  G2(S)  AT  FASTER  SAMPLING  RATE 

♦SZMRX  22T20.  14!  IJ  SAMPT  DELAY  ZOH  NTGER 

C 

C  6 .  ♦  ♦♦  COMPUTE  ROOTS  OF  ZPTF6  AND  ZPTF7  SO  THAT  IN  STEPS  6  AND  7 

C  MULTIPLICATION  WILL  BE  MORE  ACCURATE  (ROOT  DATA  INSTEAD  OF 

C  COEFFICIENT  DATA  WILL  BE  USED) 

♦ZPRTS  6 
C 

C  7.  ♦  ♦♦  COMPUTE  PRODUCT  OF  ZPTF6  AND  ZPTF1  AT  FASTER  RATE 

♦ZPMPY  861 
C 

C  8 .  ♦  ♦♦  COMPUTE  PRODUCT  OF  ZPTF7  AND  ZPTF2  AT  FASTER  RATE 

♦ZPMPY  972 
C 

C  9.  ♦♦♦  COMPUTE  FAST-TO-SLOW  TRANSFER  FUNCTION 

♦ZMRXFM  10  8  T1  4  !  I  J  SAMPT  NTGER 
♦ZMRXFM  11  9  T1  4  !  I  J  SAMPT  NTGER 
C 

C  10.  ♦♦♦  COMPUTE  INNER  LOOP  TRANSFER  FUNCTION 

♦ZPRTS  4  !  COMPUTE  ROOTS  OF  ZPTF4  FOR  USE  WITH  NEXT  COMMAND 
♦ZPMPY  20  4  10  !  SAVE  IN  ZPTF20 
C 

C  11.  ♦♦*  COMPUTE  OUTER  LOOP  TRANSFER  FUNCTION 

♦ZPRTS  5  !  COMPUTE  ROOTS  OF  ZPTF5  FOR  USE  IN  NEXT  COMMAND 
♦ZPMPY  21  5  11  !  SAVE  IN  ZPTF21 
C 

C  12.  ♦♦♦  COMPUTE  OPEN  LOOP  TRANSFER  FUNCTION  WITH  LOOP  OPENED 

C  AT  PI. 

♦ZPADD  22  0  21  !  DENOMINATOR  ,  (ZPTFO=UNITY  TRANSFER  FUNCTION) 

♦ZPDIV  23  20  22  !  OPEN  LOOP  TRANSFER  FUNCTION  AS  DEFINED  BY  BENCHMARK 
♦ZELCR  23  !  ELIMINATE  COMMON  ROOTS 
C 

C  13.  ♦*♦  COMPUTE  CLOSED  LOOP  TRANSFER  FUNCTION 

♦ZPRTS  3 

♦ZPSUB  24  22  20  !  DENOMINATOR  FOR  ETA/R  TRANSFER  FUNCTION 

♦ZPDIV  26  3  24  !  OPEN  LOOP  TRANSFER  FUNCTION  AS  DEFINED  BY  BENCHMARK 

♦ROOTN  -1 

♦ROOTD  1 

♦ZPLDR  15  !  -1  TRANSFER  FUNCTION 

♦ZPMPY  25  25  15 

♦SZXFM  26  1  T1  0.  1  !  I  J  SAMPT  DELAY  ZOH 

C  ZPTF26  IS  Z  TRANSFORM  OF  G1(S)  AT  SLOWER  RATE 
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♦ZPMPY  27  25  26  !  G..Z)/R(Z)  TRANSFER  FUNCTION 

♦ZELCR  27  !  ELIMINATE  COMMON  ROOTS 
C 

C  14.  ****  COMPUTE  CLOSED  LOOP  TIME  RESPONSE  **** 

TITLEl= ’EXAMPLE  19.  IEEE  BENCHMARK  PROBLEM  NO.  3,  2-RATE  MODEL’ 
TITLE2= ’CLOSED  LOOP  RESPONSE’ 

SAMPT=T1 
TMAGN=1 . 

TEND=4. 

HRDCPY=1 
CALL  ZTIME(27) 

C 

C  15.  ****  COMPUTE  OPEN  LOOP  FREQUENCY  RESPONSE  **** 

N0MEGA=4 

♦OMEGA  .11.  10.  100. 

RAD=0 

FB0DE=1 

TITLE2='0PEN  LOOP  FREQUENCY  RESPONSE’ 

CALL  ZFREQC23) 


Since  the  complete  output  of  the  example  is  too  long  to  be  included  in  this  report,  only  a  portion 
of  it  will  be  presented.  The  output  from  the  last  command  in  Step  13  (ZELCR)  for  the  closed  loop 
transfer  function  is: 


THE  NUMERATOR  ROOTS  OF  ZR00T27  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.94101122 

- . 37660537E-01 

.94176453 

-.99920011 

2 

.94101122 

. 37660537E-01 

.94176453 

-.99920011 

3 

.90480000 

0. 

4 

1.0000000 

0. 

5 

.74067933 

0. 

6 

.66670000 

0. 

7 

.22314408 

0. 

8 

.97043947 

0. 

LOW  ORDER  NON-ZERO  COEFFICIENT  = 

.27909098 

THE  DENOMINATOR  ROOTS 

OF  ZR00T27 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.98029993 

- . 39467762E-01 

.98109411 

-.99919051 

9-55 


2 

.98029993 

. 39467762E-01 

.98109411 

-.99919051 

3 

.31254440 

-.43951523 

.53931219 

-.57952407 

4 

.31254440 

.43951523 

.53931219 

-.57952407 

5 

.94101122 

- .  37660537E-01 

.94176453 

-.99920011 

6 

.94101122 

. 37660537E-01 

.94176453 

-.99920011 

7 

1.0000000 

0. 

8 

.95273968 

0. 

9 

.73944478 

0. 

LOW  ORDER  NON-ZERO 

COEFFICIENT  = 

-7.5576404 

DEGREE 

OF  NUMERATOR 

OF  ZPTF27  IS  8 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

.2790909822255  -3.513503822485  17.97327145477  -50.11146829954  84.46184663688 
-88.8599113312  57.29350750668  -20.7751589087  3.252325781362 

DEGREE  OF  DENOMINATOR  OF  ZPTF27  IS  9  (COEFFICIENTS  IN  ASCENDING  ORDER) 
-7.557640415876  73.38437221702  -333.6370654555  925.4071244302  -1704.964098414 
2136.457676897  -1801.82495184  978.8541332973  -309.3331323539  43.20358163761 

************************************************************ 

*  ZELCR  -  ELIMINATE  COMMON  ROOTS  OF  Z-PLANE  * 

*  TRANSFER  FUNCTION  27  * 

************************************************************ 

THE  COMMON  ROOTS  ELIMINATED  ARE 

NO.  REAL  IMAG.  OMEGA  ZETA 

1  .94101122  - . 37660537E-01 

2  .94101122  . 37660537E-01 

3  1.0000000  0. 

THE  NUMERATOR  ROOTS  OF  ZR00T27  ARE 
NO.  REAL  IMAG.  OMEGA  ZETA 

1  .90480000  0. 

2  .74067933  0. 

3  .66670000  0. 

4  .22314408  0. 

5  .97043947  0. 

LOW  ORDER  NON-ZERO  COEFFICIENT  =  .27909098 

THE  DENOMINATOR  ROOTS  OF  ZR00T27  ARE 
NO.  REAL  IMAG.  OMEGA  ZETA 

1  .98029993  - . 39467762E-01  .98109411  -.99919051 
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.98109411 

.53931219 

.53931219 


-.99919051 

-.57952407 

-.57952407 


2  .98029993 

3  .31254440 

4  .31254440 

5  .95273968 

6  .73944478 

LOW  ORDER  NON-ZERO  COEFFICIENT  =  -7.5576404 

DEGREE  OF  NUMERATOR  OF  ZPTF27  IS  5  (COEFFICIENTS  IN  ASCENDING  ORDER) 
.2790909822265  -2.642188925974  8.817527199738  -13.68298316698  10.11256305773 
-2.884554202357 

DEGREE  OF  DENOMINATOR  OF  ZPTF27  IS  6  (COEFFICIENTS  IN  ASCENDING  ORDER) 
-7.557640415876  49.78961245687  -153.6368358003  275.4457299234  -289.6434766984 
163.9201387739  -38.31813949378 

I _ I 

This  closed  loop  transfer  function  is  identical  to  the  one  computed  in  Example  18  (ZPTF20)  using 
the  Kalman- Bertram  method.  The  roots  agree  to  all  eight  significant  digits.  The  coefficients  are 
not  the  same  since  they  are  normalized  differently.1 

Since  the  time  response  from  step  14  is  identical  (to  5  significant  digits)  to  the  response  computed 
in  Example  18,  it  will  not  be  repeated  here. 

The  output  from  Step  12  for  the  open  loop  transfer  function  is: 


. 39467762E-01 
-.43951523 
.43951523 
0. 

0. 


THE 

NUMERATOR  ROOTS  OF 

ZR00T23  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

.94101122 

- . 37660537F-01 

.94176453 

.99920011 

2 

.94101122 

. 37660537E-01 

.94176453 

.99920011 

3 

.96080000 

0. 

4 

-.61403003 

0. 

5 

.97044501 

0. 

6 

1.0000000 

0. 

7 

.74067933 

0. 

LOW 

ORDER  NON-ZERO  COEFFICIENT  =  -22. 

604320 

THE 

DENOMINATOR  ROOT® 

OF  ZR00T23  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1  They  can  be  normalized  to  match  ZPTFjo  in  Example  18  by  using  command  ZNORM  with  NRMHI=1.  and 
KNORM  =  -. 8869204367171 
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1 

.94101122 

- . 37660537E-01 

.94176453 

-.99920011 

2 

.94101122 

. 37660537E-01 

.94176453 

-.99920011 

3 

.97235235 

- . 61401444E-01 

.97428909 

-.99801215 

4 

.97235235 

.  61401444E-01 

.97428909 

-.99801215 

5 

.66670000 

0. 

6 

.22314408 

0. 

7 

.95003926 

0. 

8 

.72805531 

0. 

LOW  ORDER  NON-ZERO 

COEFFICIENT  = 

22.177984 

DEGREE 

OF  NUMERATOR 

OF  ZPTF23  IS  7 

(COEFFICIENTS 

IN  ASCENDING  ORDER) 

-22.60432033414  111.0947165917  -161.4722917927  -72.71149184799  475.1752142865 
-566.2754878395  296.8948447107  -60.10118377454 

DEGREE  OF  DENOMINATOR  OF  ZPTF23  IS  8  (COEFFICIENTS  IN  ASCENDING  ORDER) 
22.17798412137  -278.9572814681  1425.420341105  -3969.258307125  6681.222504636 
-7019.668562258  4520.097788189  -1637.034447198256. 


***********************************4************************ 

*  ZELCR  -  ELIMINATE  COMMON  ROOTS  OF  Z-PLANE  * 

*  TRANSFER  FUNCTION  23  * 

444444444444444444444444444444444***4***4***44*444*44444***4 


THE  COMMON  ROOTS  ELIMINATED  ARE 


NO. 

REAL 

IMAG.  OMEGA 

1 

.94101122 

- . 37660537E-01 

2 

.94101122 

. 37660537E-01 

THE  NUMERATOR  ROOTS  OF  ZR00T23 

NO. 

REAL 

IMAG.  OMEGA 

1 

.96080000 

0. 

2 

-.61403003 

0. 

3 

.97044501 

0. 

4 

1.0000000 

0. 

5 

.74067933 

0. 

ZETA 


ZETA 


NO. 

1 


LOW 

ORDER  NON-ZERO 

COEFFICIENT  = 

-22.604320 

THE 

DENOMINATOR  ROOTS  OF  ZR00T23 

ARE 

REAL 

,  -<tG. 

OMEGA 

ZETA 

97235235 

•  .6J4C.M4E-01 

.97428909 

-.99801215 
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2  .97235235 

3  .66670000 

4  .22314408 

5  .95003926 

6  .72805531 


. 61401444E-01  .97428909  -.99801215 

0. 

0. 

0. 

C. 


LOW  ORDER  NOB-ZERO  COEFFICIENT  =  22.177984 

DEGREE  OF  NUMERATOR  OF  ZPTF23  IS  5  (COEFFICIENTS  IN  ASCENDING  ORDER) 
-22.60432033414  63.12892793987  -2.028023987502  -148.1925742894  163.0009588318 
-53.30496816062 

DEGREE  OF  DENOMINATOR  OF  ZPTF23  IS  6  (COEFFICIENTS  IN  ASCENDING  ORDER) 
22.17798412137  -231.8961673374  908.3370076613  -1780.328248869  1879.264454223 
-1024.603039651  227.0516317996 


I _ I 

This  open  loop  transfer  function  is  identical  to  the  one  computed  in  Example  18  (ZPTF2i)  using 
the  Kalman-Bertram  method.  The  roots  agree  to  all  eight  significant  digits.  The  coefficients  are 
not  the  same  since  they  are  normalized  differently.1 

Since  the  frequency  response  from  step  15  is  identical  to  the  response  computed  in  Example  18,  it 
will  not  be  repeated  here. 

Although  the  classical  transform  method  for  analyzing  this  multirate  benchmark  problem  requires 
more  effort  to  set  up,  it  provides  some  features  not  offered  by  the  automated  method  used  in 
Example  18. 

•  The  commands  utilized  in  performing  the  block  diagram  reduction,  particularly  when  con¬ 
verting  from  a  fast  rate  transform  to  a  slow  rate  transform,  enables  the  analyst  to  “track”  s 
plane  roots  to  the  z  plane  at  different  sampling  sampling  rates.  With  the  Kalman-Bertram 
method  employed  by  the  automated  method,  the  z  plane  roots  are  more  difficult  to  correlated 
with  s  plane  roots. 

•  Time  delays  in  the  s  plane  can  be  easily  modeled  with  classical  transform  methods.  At  the 
present  time  the  automated  method  cannot  handle  time  delays 

For  this  problem,  block  diagram  reduction  was  performed  entirely  in  the  z  plane  without  loss  of 
computational  accuracy.  For  higher  order  systems,  block  diagram  operations  involving  addition 
or  subtraction  of  z  plane  transfer  functions  will  result  in  computational  error.  For  that  case  the 
block  diagram  reduction  should  be  performed  in  the  w  plane  instead.  In  the  files  which  contain 
this  benchmark  problem,  the  commands  for  the  w  plane  solution  are  also  included  to  demonstrate 
how  a  w  plane  analysis  is  set  up. 

As  stated  in  Chapter  7,  the  classical  transform  method  cannot  always  be  applied  in  analyzing  a 
multirate  system.  There  can  be  configurations  in  which  this  method  cannot  be  used.  The  automated 
analysis  method  based  on  the  Kalman-Bertram  method,  on  the  other  hand,  is  a  general  analysis 

‘They  can  be  normalized  to  match  ZPTFji  in  Example  18  by  using  command  ZNORM  with  NRMHI=1.  and 
KNORM  =  -. 886920436  V 171 
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method  which  can  always  be  used  for  any  multirate  system  in  which  the  ratios  of  the  sampling  rates 
are  integers1.  In  practice,  multirate  systems  which  are  modeled  as  a  connection  of  transfer  functions 
should  be  analyzed  by  the  Kalman- Bertram  method  since  it  is  a  general  method  and  is  easy  to  set 
up.  Then,  if  applicable,  the  analysis  can  be  complemented  by  the  classical  transform  method  since 
it  can  provide  some  insight  to  the  problem  not  offered  by  the  Kalman-Bertram  method. 


The  Kalman-Bertram  method  will  yield  a  transition  matrix  at  the  LCM  sampling  period  from  which  eigenvalues 
and  root  Joci  can  always  be  computed.  Transfer  function  evaluation  using  command  B2TF  and  frequency  response 
using  command  B2FREQ  can  only  be  obtained  if  the  slowest  sampling  period  is  also  equal  to  the  LCM  sampling 
period  of  the  system. 
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9.7  Example  20  IEEE  CACSD  Benchmark  Problem  No.  3,  4- Rate 
Model  (automated  analysis  method) 

Solution  of  the  4-rate  sampled-data  model  from  the  IEEE  CACSD  Benchmark  Problem  No.  3  [5]  is 
presented  in  this  example  using  the  LCAP2  automated  analysis  method  based  on  transfer  function 
connection  blocks.  This  automated  method  will  show  the  ease  in  setting  up  the  analysis  to  solve 
for  the  objectives  of  the  benchmark  problem.  The  additional  setup  effort  of  this  problem  over  the 
2-rate  problem  is  minimal  relative  to  the  added  complexity  of  the  problem1.  The  block  diagram  of 
this  problem,  labeled  in  terms  of  (l)  LCAP2  transfer  function  connection  blocks  and  (2)  LCAP2 
SPTF;  and  ZPTF;  transfer  functions,  is  given  in  Figure  9.10.  This  figure  includes  a  unity  discrete 
connection  block  D13  used  to  define  the  sampled  output  of  Gi  at  the  slower  sampling  rate  and  a 
unity  discrete  connection  block  Dg  to  be  used  in  defining  an  open  loop  transfer  function. 


Figure  9.10:  Block  Diagram  for  IEEE  Benchmark  4-Rate  Model 


Problem  statement,  system  parameters  and  transfer  functions  are  the  same  as  those  given  in  Ex¬ 
ample  18,  plus  the  following: 

T3  =  1/1000;  T<  =  1/2000 

♦  •♦continuous  transfer  functions 

Gg  -  Ggx^Gg2 

'This  would  not  be  true  if  the  classical  transform  method  of  analysis  were  used  instead.  See  Example  21. 
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G8i  =  62.8*62.8  /  (s**2  +  94.25*s  +  62.8*62.8  ) 

Ggj  =  1  /  (  0.031*s  4-  1) 

Gg  -  Ggi*Cg2 

Ggj  =  200*200  /  (s**2  -f  2*0.125*200*s  +  200*200  ) 

G92  =  1  /  s 
G10  =  G10i*Gio2 

Gioi  =  100*100  /  (s**2  +  2*0.125*100*s  +  100*100  ) 

G102  =  1  /  s 

***discrete  transfer  functions 
Gn  —  G1h*Gi12*G1i3 
Gin  =  (  z  -  1)  /  z 

Gii2  =  0.9942*(z**2  -  1.6179*z  +  1)  /  (z**2  -  l/6084*z  +  0.9883) 
G113  =  1  /  (  z  -  1  ) 

Gl2  =  1  /  Z 

G 13  =  Gi3i*Gi32 

G131  —  (  Z  -  1  )  /  (  T2*Z  ) 

G132  =  0.9994*(z**2  -  1.786*z  -f  1  )  /  (z**2  -  1.785*z  +  0.9988  ) 

G14  =  Gi3 


The  same  10  steps  described  in  Examples  18  will  bt  used  to  solve  this  4-rate  problem.  An  additional 
11-th  step  using  command  B2FREQ  will  be  used  to  obtain  the  open  loop  frequency  response  by 
state  space  methods  so  that  its  results  can  be  compared  with  those  obtained  from  the  rational 
transfer  function  in  Step  10. 

As  with  Example  18,  the  PRECMP  precompiler  will  be  used  to  simplify  the  setup  of  this  problem. 
The  PRECMP  code  is: 


C  IEEE  CACSD  BENCHMARK  PROBLEM  HO.  3,  4-RATE  MODEL 
C 

C  1.  ****  LOAD  IH  S  PLANE  TRANSFER  FUNCTIONS  **** 

♦P0LYN  1  -15*1.5  -15 

♦P0LYD  2  13  6  1 

•SPLDC  1 

C 

*P0LYN  1  9  -.1 
*P0LYN  1  9  -.1 
*P0LYD  2  13  6  1 
♦SPLDC  2 
C 

*P0LYN  0  200. *200. 

♦P0LYD  3  0.  200. *200.  2. *.125*200.  1. 

*SPLDC  9 
C 

*P0LYN  0  100. *100. 

*P0LYD  3  0.  100. *100.  2. *.125*100.  1. 
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♦  SPLDC  10 
C 

♦POLYS  0  62.8*62.8 
*POLYD  2  62.8*62.8  94.25  1 
*SPLDC  81 
C 

♦POLYS  0  1 
*POLYD  1  1  .03 
♦SPLDC  82 
C 

c  2.  ****  ESTER  SAMPLING  PERIODS  **** 

Tl=l/50 . 

T2=l/200 . 

T3=l/ 1000 . 

T4=l/2000 . 

C 

C  3.  ***♦  LOAD  is  z  plahe  TRANSFER  FUSCTIOBS  **** 

*POLYB  1  -.2625*. 9048  .2625 

♦POLYD  1-11 

*ZPLDC  3 

C 

♦POLYS  1  -1.7*. 9608  1.7 
♦POLYD  1  -.6667  1 
♦ZPLDC  4 
C 

♦POLYB  1  -1.035*. 9324  1.035 
♦POLYD  1-11 
♦ZPLDC  5 
C 

♦POLYS  1  .1564  .1564 
♦POLYD  1  -.6873  1.0 
♦  ZPLDC  6 
C 

♦POLYB  1  .0362  .0362 
♦POLYD  1  -.9277  1 
♦ZPLDC  7 
C 

♦POLYB  2  .9942  -.9942*1.6179  .9942 
♦POLYD  3  0.  .9883  -1.6084  1. 

♦ZPLDC  11 
C 

♦POLYB  0  1 
♦POLYD  101 
♦ZPLDC  12 
C 

♦POLYB  0  1 
♦POLYD  0  1 
♦ZPLDC  15 
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c 

♦POLYN  1-11 
♦POLYD  1  0  T2 
♦ZPLDC  131 
C 

♦POLYN  2  .9994  -.9994*1.736  .9994 
*POLYD  2  .9988  -1.785  1. 

♦ZPLDC  132 
C 

C  4.  ****  DEFINE  AND  CONNECT  TRANSFER  FUNCTION  BLOCKS  FOR  CLOSED 

C  ****  LOOP  CONFIGURATION 

DELAY=0 . 

C  NOTE:  DELAY  OPTION  NOT  IMPLEMENTED  YET 
C 

c  ******************************************************* 

c 

•B2INIT  ’IEEE  CACSD  BENCHMARK  PROBLEM  NO.  3,  4-RATE  MODEL’  .. 

’NEW’  6  13  1 
C 

DELAY=0. 

C 

♦IYCIN  4 

INDX=1 

ISPTF=1 

NYCIN=1 

NXSIN=0 

♦B2CEQ  *G1  BLOCK’  INDX  ISPTF  DELAY  0  NYCIH  NXSIN 
C 

♦IYCIN  4 

♦B2CEQ  ’G2  BLOCK’  2  2  DELAY  010 
C 

*IXSIN  1 

♦B2CEQ  ’G81  BLOCK’  3  81  DELAY  001 
C 

♦IYCIN  3 

*B2CEq  ’G82  BLOCK’  4  82  DELAY  010 
C 

♦IYCIN  1 

♦B2CEQ  ’G9  BLOCK’  5  9  DELAY  010 
C 

♦IYCIN  2 

♦B2CEQ  ’G10  BLOCK’  6  10  DELAY  010 
C 

♦B2DEQ  ’G3  BLOCK’  1  3  T1  DELAY  0000 
C 

♦IYDIN  4 

♦B2DEQ  ’G4  BLOCK’  2  4  T1  DELAY  0010 
C 
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♦IYDIN  5 

*B2DEQ  'G5  BLOCK  *  3  5  T1  DELAY  0010 
C 

♦IYDIN  7 

♦B2DEQ  ’G6  BLOCK*  4  6  T2  DELAY  0010 
C 

♦IYDIN  9 

♦B2DEQ  *G7  BLOCK*  5  7  T2  DELAY  0010 
C 

♦IYDIN  -1  2  -3 

♦B2DEQ  'SUMMER  BLOCK’  6  15  T1  DELAY  0030 
C 

♦IYDIN  8 

♦B2DEQ  ’G131  BLOCK’  7  131  T2  DELAY  0010 
C 

♦IYDIN  11 

♦B2DEQ  *G132  BLOCK’  8  132  T2  DELAY  0010 
C 

♦IYDIN  10 

♦B2DEQ  ’G131  BLOCK’  9  131  T2  DELAY  0010 
C 

♦IYDIN  12 

♦B2DEQ  ’G132  BLOCK’  10  132  T2  DELAY  0010 
C 

♦IYCIN  5 

♦B2DEq  ’Gil  BLOCK’  11  11  T4  DELAY  0100 
C 

♦IYCIN  6 

*B2DEq  ’G12  BLOCK’  12  12  T3  DELAY  0100 
C 

♦IYCIN  1 

♦B2DEq  ’T1  SAMPLER  AT  BLOCK  Cl’  13  0  T1  DELAY  0100 
C 

♦IYDIN  6 

♦B2SEq  ’ ZOH  BLOCK’  1  T1  DELAY  1  0 
C 

C  I*************************************************** 

c 

♦B2END 

C 

C  ♦♦♦♦  CONNECTION  OF  TRANSFER  FUNCTION  BLOCKS  COMPLETED  ♦♦♦♦ 

C 

C  5.  ♦♦♦♦  COMPUTE  CLOSED  LOOP  T.F.  FROM  D1  TO  BLOCK  D13  ♦♦♦♦ 

UDIN=1 
UMAGN=1 . 

YD0UT=13 

PRNMTRI=1 

PRINT* , ’D1  TO  D13  CLOSED  LOOP  T.F.  WILL  BE  IN  ZPTF20 ’ 
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*B2TF  20 
C 

C  6.  ****  COMPUTE  CLOSED  LOOP  TIME  RESPONSE  **** 

TITLE1= ’IEEE  BENCHMARK  PROBLEM  NO.  3,  4-RATE  MODEL’ 

TITLE2= ’CLOSED  LOOP  RESPONSE  WITH  COMMAND  ZTIME’ 

SAMPT=T1 

TMAGN=1 

TEND=4 

HRDCPY=1 

CALL  ZTIME(20) 

C 

C  7.  ****  COMPUTE  CLOSED  LOOP  FREQUENCY  RESPONSE 

TITLE2=’ CLOSED  LOOP  RESPONSE  WITH  COMMAND  B2TIME’ 

CALL  B2TIMEO 
C 

C  8.  ****  CHANGE  CONNECTION  DATA  FOR  OPEN  LOOP  CONFIGURATION  **** 

♦B2INIT  ’IEEE  BENCHMARK  NO.  3,  OPEN  INNER  LOOP  T.F. ’  .. 

’OLD’  6  13  1 
♦IYDIN  -1  -3 

*B2DEQ  ’SUMMER  BLOCK’  6  0  T1  DELAY  0020 

♦B2END 

C 

C  ****  CONNECTION  OF  TRANSFER  FUNCTION  BLOCKS  COMPLETED  **** 

C 

C  9.  ****  COMPUTE  OPEN  LOOP  TRANSFER  FUNCTION  **** 

UDIN=6 

UMAGN=1 

YD0UT=2 

PRINT*, ’OPEN  LOOP  T.F.  WILL  BE  IN  ZPTF21 ’ 

*B2TF  21 
C 

C  10.  ****  COMPUTE  OPEN  LOOP  FREQUENCY  RESPONSE  **** 

N0MEGA=4 

♦OMEGA  .01  .1  1.  25. 

RAD=0 

FNIC0=1 

FB0DE=1 

SAMPT=T1 

TITLE2= ’OPEN  LOOP  FREQUENCY  RESPONSE  WITH  COMMAND  ZFREQ ’ 

CALL  ZFREQC21) 

C 

C  ****************************************************************** 

c 

C  11.  ****  COMPUTE  OPEN  LOOP  FREQUENCY  RESPONSE  **** 

TITLE2= 'OPEN  LOOP  FREQUENCY  RESPONSE  WITH  COMMAND  B2FREQ ’ 

CALL  B2FREQQ 
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Since  the  complete  output  of  the  example  is  too  long  to  be  included  in  this  report,  only  a  portion 
of  it  will  be  presented.  The  output  from  Step  5  for  the  command  B2TF  is: 


D1  TO  D13  CLOSED  LOOP  T.F .  WILL  BE  II  ZPTF20 

IEEE  CACSD  BENCHMARK  PROBLEM  NO.  3,  4-RATE  MODEL 

NUMBER  OF  CONTINUOUS  BLOCKS  =  6 

BLOCK  DESCRIPTION 

Cl  G1  BLOCK 

C2  G2  BLOCK 

C3  G81  BLOCK 

C4  G82  BLOCK 

C5  G9  BLOCK 

C6  G 10  BLOCK 

BLOCK  TRANSFER  FUNCTION  INPUTS  FROM  BLOCKS 


Cl 

SPTF1 

C4 

C2 

SPTF2 

C4 

C3 

SPTF81 

SI 

C4 

SPTF82 

C3 

C5 

SPTF9 

Cl 

C6 

SPTF10 

C2 

NUMBER  OF  DISCRETE  BLOCKS  =  13 

BLOCK  DESCRIPTION 

D1  G3  BLOCK 

D2  G4  BLOCK 

D3  G5  BLOCK 

D4  G6  BLOCK 

D5  G7  BLOCK 

D6  SUMMER  BLOCK 

D7  G131  BLOCK 

D8  G132  BLOCK 

D9  G131  BLOCK 

DIO  G132  BLOCK 

Dll  Gil  BLOCK 

D12  G12  BLOCK 

D13  T1  SAMPLER  AT  BLOCK  Cl 

BLOCK  TRANSFER  FUNCTION  SAMPLING  PERIOD  INPUTS  FROM  BLOCKS 

D1  ZPTF3  . 20000E-01  HAS  NO  INPUT 
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D2 

ZPTF4 

. 20000E-01 

D4 

D3 

ZPTF5 

. 20000E-01 

D5 

D4 

ZPTF6 

. 50000E-02 

D7 

D5 

ZPTF7 

. 50000E-02 

D9 

D6 

ZPTF15 

. 20000E-01 

-D1 

D7 

ZPTF131 

. 50000E-02 

D8 

D8 

ZPTF132 

. 50000E-02 

Dll 

D9 

ZPTF131 

. 60000E-02 

DIO 

DIO 

ZPTF132 

. 50000E-02 

D12 

Dll 

ZPTF11 

. 50000E-03 

C5 

D12 

ZPTF12 

. 10000E-02 

C6 

D13 

ZPTFO 

. 20000E-01 

Cl 

NUMBER  OF  SAMPLE-HOLD  BLOCKS  =  1 

BLOCK  DESCRIPTION 

SI  ZOH  BLOCK 

BLOCK  SAMPLING  PERIOD  INPUTS  FROM  BLOCKS 

SI  .20000E-01  D6 


INPUT  IS  CONNECTED  TO  BLOCK  D1 
MAGNITUDE  OF  U  =  . lOOOOE+Ol 

BLOCK  D13  IS  THE  OUTPUT 


********************************************************************** 

*  B2TF  -  BL0CK2 :  FIND  TRANSFER  FUNCTION  FROM  D1  TO  D13  * 

*  AND  STORE  IN  ZPTF20  * 

********************************************************************** 


BASIC  SAMPLING  PERIOD  COMPUTED  =  .50000E-03 

LCM  SAMPLING  PERIOD  COMPUTED  =  .20000E-01 

TOTAL  NUMBER  OF  TIME  SEGMENTS  COMPUTED  =  40 


**************************************************************************** 
*  SEGMENT  START  * 


*  HUMBER  TIME 

DT(1) 

DT(2) 

DT(3) 

DT(4) 

DT(5) 

DT(6) 

DT(7)  * 

* 

DT(8) 

DT(9) 

DT(lO) 

DT(ll) 

DT(12) 

DT(13) 

ST(1)  * 

**************************************************************************** 

1  . OOOOOE+OO 

ON 

ON 

ON 

ON 

ON 

ON 

ON 

ON 

ON 

ON 

ON 

0N 

ON 

ON 

2  . S0000E-03 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

ON 

OFF 

OFF 

OFF 

3  . 10000E-02 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 
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4 


OFF 

OFF 

OFF 

ON 

ON 

OFF 

OFF 

4 

. 15000E-02 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

ON 

OFF 

OFF 

OFF 

5 

. 20000E-02 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

ON 

ON 

OFF 

OFF 

6 

. 2S000E-02 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

38 

. 18500E-01 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

ON 

OFF 

OFF 

OFF 

39 

. 19000E-01 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

ON 

ON 

OFF 

OFF 

40 

. 19500E-01 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

OFF 

ON 

OFF 

OFF 

OFF 

COMPUTED  STATE  SPACE  REPRESENTATION  IS: 

X(K+1)  =  PSI  *  X(K)  +  B  *  U(K) 

Y(K)  =  C  *  X(K)  +  DD  *  U(K) 

WHERE  X(  1:13)  ARE  THE  CONTINUOUS  STATES 
X(14:28)  ARE  THE  DISCRETE  STATES 
X(29 : 29)  ARE  THE  SAMPLE-HOLD  STATES 
Y  IS  THE  OUTPUT  VECTOR  OF  LENGTH  13 

C  =  [FD  CD  HD]  AND  THE  LCM  SAMPLING  PERIOD  =  .20000E-01 
(THE  I-TH  ELEMENT  OF  Y  IS  THE  OUTPUT  OF  THE  I-TH  DISCRETE  CONNECTION  BLOCK) 


MATRIX  PSI  IS 


( 

1.  1) 

. 88452042E+00 

( 

1,  2) 

. 18830268E-01 

( 

1.  5)- 

. 38961641E-01 

( 

1.  6)- 

. 33798898E-03 

( 

1.  7)- 

. 20825888E+00 

( 

1.14) 

. 77014595E-02 

( 

1.16)- 

. 77014595E-02 

( 

1.16) 

. 77014595E-02 

( 

1,17)- 

. 13092481E-01 

( 

1.18) 

.79710106E-02 

( 

1.19)- 

. 20476641E-02 

( 

1.20)- 

.40963281E+00 

( 

*.22) 

. 28855058E-03 

( 

1.23) 

. 57710117E-01 

( 

1,25)- 

. 40928709E+00 

( 

1.28) 

. 57675491E-01 

( 

2.  1)- 

. 24479349E+00 

( 

2.  2) 

. 99750203E+00 

( 

2.  5)- 

. 56348217E-01 

( 

2,  6)- 

.49485848E-03 

( 

2,  7)- 

. 29782120E+00 

( 

2,14) 

. 11342097E-01 

( 

2.15)- 

. 11342097E-01 

( 

2,16) 

.  11342097E-01 

( 

2.17)- 

. 19281565E-01 

( 

2,18) 

. 11739070E-01 

( 

2.19)- 

.  30156368E-02 

( 

2.20)- 

.60312735E+00 

( 

2.22) 

•42495435E-03 

( 

2.23) 

.  84990870E-01 

( 

2.26)- 

. 60276548E+00 

( 

2,28) 

. 84939875E-01 

( 

3.  3) 

. 88452042E+00 

( 

3,  4) 

. 18830268E-01 

( 

3.  5)- 

.5S346093E-04 

( 

3,  6)- 

. 10698617E-05 

( 

3.  7) 

. 33357430E-04 

( 

3.34) 

.30838061E-04 

( 

3.16)- 

. 30838061E-04 

( 

3.16) 

. 30838061E-04 

( 

3.17)- 

. 52424704E-04 

( 

3.18) 

. 31917394E-04 

( 

3.19)- 

. 81992238E-05 

( 

3,20)- 

. 16398448E-02 

( 

3,22) 

.  11554096E-05 

( 

3.23) 

. 23108193E-03 

( 

3,25)- 

. 16388608E-02 

( 

3,28) 

. 23094328E-03 

( 

4.  3)- 

. 24479349E+00 

< 

4.  4) 

. 99750203E+00 

( 

4.  5) 

.  24310738E-01 

( 

4.  6) 

. 20819951E-03 

< 

4.  7) 

. 13145031E+00 

( 

4,14)- 

•47145488E-02 

( 

4.15) 

.47146488E-02 

( 

4,16)- 

.47145488E-02 

( 

4,17) 

.  80147330E-02 
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(  4,18)- . 48795580E-02 
(  4,22)- . 17664000E-03 
(  4,28)-. 35306803E-01 
(  5,14)-. 41059877E+00 
(  5,17)  . 69801791E+00 
(  5,20)  . 21834000E+02 
(  5,25)  . 21820900E+02 
(  6,  6)  . 58940123E+00 
(  6,16)-. 66022638E+02 
(  6,19)  . 17554099E+02 
(  6,23)- . 49473404E+03 
(  7,  5)  . 14095167E+00 
(  7 , 14) - . 91189407E-01 
(  7.17)  . 15S02199E+00 
(  7,20)  . 48490879E+01 
(  7,25)  . 48461785E+01 
C  8,  2)  . 13395871E-03 
(  8,  7)- . 17395870E-02 
(  8,10)  . 36672369E-04 
(  8,16)  . 10293583E-04 
C  8,19)- . 27368579E-05 
(  8,23)  . 77133936E-04 
(  9,  1)  . 23277209E+01 
(  9,  6) - . 23835286E-03 
(  9.  9) - . 46689476E+00 
(  9,15)-. 36756490E-02 
(  9,18)  . 38042967E-02 
(  9,22)  . 1377 1554E-03 
(  9,28)  . 27526582E-01 
(10.  5) - . 13519559E+02 

(10.10)  . 10000000E+01 

(10.16)  . 13517689E+01 

(10.19) -. 3594083 1E+00 

(10,23)  . 10129345E+02 
(11,  3)  . 94396901E-02 
(11.  6) - . 12614667E-08 

(11,12)  . 71879586E-02 

(11,15)-. 16164417E-07 
(11,18)  . 16730172E-07 

(11,22)  . 60563221E-09 

(11,28)  . 12105377E-06 
(12,  5) - . 655783 16E-04 

(12.11) - . 71879585E+02 

(12.14)  . 53791332E-05 

(12.17) -. 91445265E-05 

(12.20) -. 28604079E-03 
(12,26)-. 285869 16E-03 
(13,  4)  . 19215174E+01 


(  4,19)  . 12535042E-02 
(  4,23)-. 35328000E-01 
(  5,  5) - . 63581423E-01 
(  5,15)  . 41059877E+00 
(  5,18)-. 42496973E+00 
(  5,22)- . 15383904E-01 
(  5,28)-. 30749347E+01 
(  6,14)-. 66022638E+02 
(  6,17)  .  11223848E+03 
(  6,20)  . 35108198E+04 
(  6,25)  . 35087133E+04 
(  7,  6)  . 26996477E-02 
(  7,15)  . 91189407E-01 
(  7,18)-. 94381036E-01 
(  7,22)-. 34165935E-02 
(  7,28)-. 68290871E+00 
(  8,  5) - . 19827809E-03 
(  8,  8)- . 35442209E+00 
(  8,14)  . 10293583E-04 
(  8,17)-. 1749909  IE-04 
(  8,20)- . 54737 157E-03 
(  8,25)-. 547043 15E-03 
(  9,  2)  . 26301745E-01 
(  9,  7) - . 32606433E+00 
(  9, 10) - . 41583496E-03 
(  9,16)  . 36756490E-02 
(  9 , 19) - . 97728156E-03 
(  9,23)  . 27543108E-01 
(10,  1)  . 75321073E+03 
(10,  6) - . 78111277E-01 

(10.14)  . 13517689E+01 

(10.17) -. 22980071E+01 

(10,20)-.71881662E+02 
(10,25)- . 71838533E+02 
(11,  4)  . 51974283E-04 
(11,  7)-.27682709E-05 

(11,13)  . 12230980E-03 

(11,16)  . 16164417E-07 
(11,19)- . 42977952E-08 

(11,23)  . 121 12644E-06 
(12,  3)  . 14017745E+01 
(12.  6)- . 34521694E-06 

(12,12)-. 22309799E+00 

(12.15) -. 53791332E-05 

(12.18)  . 55674029E-05 

(12,22)  . 20153998E-06 

(12,28)  .40283812E-04 
(13,  5)- . 10698617E-01 


(  4,20)  . 25070085E+00 
(  4,25)  . 25055043E+00 
(  5,  6)  . 69281979E-02 
(  5,16)-. 41059877E+00 
(  5,19)  . 10917000E+00 
(  5,23)-.30767808E+01 
(  6,  5) - . 27323704E+02 
(  6,15)  . 66022638E+02 
(  6,18)-. 68333430E+02 
(  6,22)-. 24736702E+01 
(  6 ,28)- .49443720E+03 
(  7,  7)  . 51341712E+00 
(  7,16)-. 91189407E-01 
(  7,19)  . 24245440E-01 
(  7,23)-. 68331870E+00 
(  8,  1)  . 19603809E-01 
(  8,  6) - . 80149546E-06 
(  8,  9) - . 22494534E-02 
(  8,15)-. 10293583E-04 
(  8,18)  . 10653859E-04 
(  8,22)  . 38566968E-06 
(  8,28)  . 77087655E-04 
(  9,  5) - . 46051459E-01 
(  9,  8)  . 89978137E+02 
(  9,14)  . 36756490E-02 
(  9,17)-. 62486033E-02 
(  9,20)-. 1 954563 1E+00 
(  9,25)-. 19533904E+00 
(10,  2)  . 76860695E+01 
(10,  7 ) - . 94222273E+02 

(10.15) -. 13517689E+01 

(10.18)  . 13990808E+01 

(10.22)  . 50646725E-01 

(10,28)  . 10123267E+02 
(11,  5)- . 31368028E-06 
(11,11)-. 40279695E+00 

(11,14)  . 16164417E-07 

(11,17)-. 27479509E-07 

(11,20)-. 85955904E-06 
(11,25)-. 85904330E-06 
(12,  4)  . 10738947E-01 
(12,  7)-.45312154E-03 

(12,13)  . 10245703E-01 

(12.16)  . 53791332E-05 

(12.19) -. 14302039E-05 

(12.23)  . 40307997E-04 
(13,  3)  . 18830268E+03 
(13,  6) - . 78192983E-04 
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(13,  7)- . S6105S87E-01 

(13.15) -. 15231246E-02 

(13,18)  . 15764339E-02 

(13.22)  . 57066908E-04 

(13.28)  . 11406534E-01 

(15.17) -. 49997000E+00 

(15.25) -. 15629678E+02 

(16.22)  . 25327692E-02 
(17,  1)  . 51530531E+00 
(17,  6) - . 77639362E-05 
(17,  9) - . 531 9686 IE-01 

(17.15) -. 69593818E-04 

(17.18)  . 72029601E-04 

(17,21)  . 74646919E+02 

(17.25)  . 11175732E+02 

(17.28)  . 52118142E-03 
(18,  5) - . 10483536E-05 

(18.11) -. 60081997E+00 

(18.14)  . 23544716E-07 

(18.17) -. 400260 17E-07 

(18.20) -. 12520138E-05 

(18.24)  . 27791629E+02 
(19.  1)- . 22385270E+01 
(19,  6)  . 30356597E-04 
(19,  9) - . 18636239E+00 

(19.15)  .26893282E-03 

(19.18) -. 27834547E-03 

(19.21) -. 43748500E+03 

(19.25) -. 16805239E+03 

(19.28) -. 20140120E-02 
(20,  5)  . 61041976E-07 
(20.  8)  . 86133725E-03 

(20 . 14)  - . 13933326E-08 

(20,17)  . 23686654E-08 

(20,20)  . 16024267E+01 

(20.23) -. 10440799E-07 
(20,27)  . 14107523E-02 
(21,  2)  . 69218069E-07 
(21,  7) - . 94667766E-06 

(21,10)  . 8312467SE-07 

(21.16)  . 16969105E-08 

(21.19) - .45117457E-09 

(21.22)  . 63578 147E-10 

(21.26)  . 10996661E-04 
(22,  3) - . 74624900E+00 
(22,  6)  . 39648848E-07 

(22.12) -. 16614717E+01 

(22.15)  . 33874197E-06 


(13.13)  . lOOOOQOOE+Ol 

(13.16)  .15231246E-02 

(13.19) -. 40496836E-03 

(13.23)  . 11413382E-01 

(14.14)  . 10000000E+01 

(15.19) - . 78195308E-01 

(16.16)  . 10000000E+01 

(16.23)  . 50655384E+00 
(17,  2)  . 23657321E-02 
(17,  7 ) - . 32059235E-01 

(17.10)  . 15996706E-02 

(17.16)  . 69593818E-04 

(17.19)  . 85659253E-01 

(17.22)  . 26074716E-05 

(17,26)  . 19047635E+00 
(18,  3)  . 50880579E-01 
(18,  6) - . 27490975E-08 

(18.12)  . 10540411E+00 

(18.15) -. 235447 16E-07 

(18.18)  . 74067936E+00 

(18.22)  . 55714815E-01 

(18.25) -. 12512626E-05 
(19,  2) - . 96692790E-02 
(19,  7)  . 13143046E+00 

(19.10) -. 82281809E-02 

(19. 16) - .26893282E-03 

(19.19)  . 71503858E-04 

(19.22) -. 10076106E-04 

(19.26) -. 10338663E+01 
(20,  1)-. 13677512E-04 
(20,  6)  . 16048118E-09 
(20,  9) - . 33166224E-05 

(20.15)  . 13933326E-08 

(20,18)-. 14420993E-08 

(20,21)  . 21216956E+01 

(20,25)-.90316616E-03 

(20,28)-. 10434534E-07 
(21,  5) - . 75997308E-07 
(21,  8)- . 8 773923 IE-03 
(21,14)  . 16969105E-08 

(21.17) -. 2 884747 9E-08 

(21.20) -. 21191497E+01 

(21.23)  . 12715629E-07 

(21.27) -. 24631 143E-02 
(22,  4) - . 27562442E-02 
(22,  7)  . 18461803E-03 

(22.13) -. 14867662E-01 

(22.16) -. 338741 97E-06 


(13.14)  . 15231246E-02 

(13.17) - . 258931 18E-02 

(13.20) -. 80993672E-01 

(13.25) - . 80945075E-01 

(15.15)  .66670000L-00 

(15.20) -. 15639062E+02 

(16.18)  .  699660G0E-01 

(16,28)  . 50624991E+00 
(17,  5) - . 28011665E-02 
(17,  8) - . 36367406E+02 

(17,14)  . 69593818E-04 

(17,17)  . 22302577E+00 

(17.20)  . 47832013E+02 

(17.23)  . 52149431E-03 

(17.27) - . 18866682E+02 
(18,  4)  . 18970107E-03 
(18,  7) - . 12674943E-04 

(18.13)  . 99487972E-03 

(18.16)  . 23544716E-07 

(18.19) -. 62600690E-08 

(18.23)  . 24864939E+02 

(18.28) -. 86701009E+00 
(19,  5)  . 11175701E-01 
(19,  8)  . 13789607E+03 

(19.14) -. 26893282E-03 

(19.17)  .45718579E-03 

(19.20) -. 42432482E+03 

(19.23) -.20152212E-02 

(19.27)  . 16838297E+03 
(20,  2)- . 54725198E-07 
(20,  7)  . 74708801E-06 

(20.10) -. 58330592E-07 

(20.16) -. 13933326E-08 

(20,19)  . 37045927E-09 

(20,22)-. 52203993E-10 

(20.26) - . 74024734E-05 
(21,  1)  . 17946481E-04 
(21,  6)- . 19708420E-09 
(21,  9)  . 69657548E-05 

(21.15) -. 16969 105E-08 

(21.18)  . 17563024E-08 

(21.21) -. 2 184800 1E+01 
(21,25)  . 24972360E-02 

(21.28)  . 12708000E-07 
(22,  5)  . 15183560E-04 

(22.11) -. 93497819E+01 
(22,14)-. 33874 197E-06 

(22.17)  . 57586136E-06 
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(22.18) -. 35059794E-06 

(22.22) -. 12691646E-07 

(22.25)  . 18002135E-04 
(23,  4)- . 15261326E-07 
(23,  7)  . 10393623E-08 

(23.13) - .95299123E-07 

(23.16) -. 17478962E-11 

(23.19)  . 46473063E-12 

(23.23)  . 16024266E+01 

(23.28)  . 50291243E-03 
(24,  5) - . 10211597E-09 

(24.11)  . 10143474E-02 

(24.14)  . 21251103E-11 

(24.17) -. 36126874E-1 1 

(24.20) -. 11300486E-09 

(24.24) -. 2 184800 1E+01 
(25,  1)  . 1889S334E-01 
(25,  6) - . 70402890E-06 
(25,  9)- . 20421261E-02 

(25.15) -. 87660992E-05 

(25.18)  . 90729127E-05 

(25.22)  . 32843944E-06 

(25.26)  . 65084798E-02 
(26,  1)- . 30299604E-01 
(26,  6)  .11307S18E-0S 
(26,  9)  . 32896449E-02 

(26.15)  . 14087229E-04 

(26.18) -. 14580282E-04 

(26 . 22)  - . 52780623E-06 

(26.26)  . 78502748E+00 
(27,  1)  . 18808325E-01 
(27,  6)-.70269525E-06 
(27,  9) - . 20470334E-02 

(27.15) - .87568294E-05 

(27.18)  . 90633185E-05 

(27.22)  . 32809213E-06 

(27.28)  . 65579055E-04 
(28,  5) - . 2590260 IE-06 

(28.11) -.33828328E+00 

(28.14)  . 11771007E-07 

(28.17) -. 20G10712E-07 

(28.20) -. 62593507E-06 

(28.25) -. 62555950E-06 

(29.15)  .  10000000E+01 

(29.18) -. 10350000E+01 

(29.22) -. 37467000E-01 

(29.28) -. 74889040E+01 

MATRIX  B  IS 


(22.19)  . 900647 16E-C7 

(22.23) -. 424339 13E+03 
(22,28:  . 90770122E-02 
(23,  5)  . 82301375E-10 

(23.11) -.36179713E-03 

(23.14) -. 17478962E-11 

(23.17)  . 297 14235E-1 1 

(23.20)  . 92946127F-10 

(23.24)  . 21216956E+01 
(24,  3)  . 56264496E-05 
(24,  6) -. 2553859 5E-12 

(24.12)  . 19146654E-04 

(24.15) -.21251103E-11 

(24.18)  . 21994891E-11 

(24.22)  . 79621506E-13 

(24.25) -. 11293706E-09 
(25,  2)  . 12403035E-03 
(25,  7)-.16180082E-02 

(25.10)  . 37776022E-04 

(25.16)  . 87660992E-05 

(25.19) -. 23307305E-05 

(25.23)  . 65687888E-04 

(25.27) -. 79432103E+00 
(26,  2)- . 19902157E-03 
(26,  7)  . 25960847E-02 

(26.10) -. 60512050E-04 

(26.16) -. 14087229E-04 

(26.19)  . 37455126E-05 

(26.23) -. 10556125E-03 

(26.27)  . 12840944E+01 
(27,  2)  . 12360617E-03 
(27,  7)-.16122630E-02 

(27.10)  . 37531620E-04 

(27.16)  . 87568294E-05 

(27.19) -.23282658E-05 

(27.23)  . 65618426E-04 
(28,  3)  . 83069000E-02 
(28,  6)-. 9756288 3E -09 

(28.12)  .  '  bb89422E-02 

(28.15) -.11771007E-07 

(28.18)  . 12182992E-07 

(28.22)  . 44102432E-09 

(28.28)  . 88151940E-07 

(29.16) -. 10000000E+01 

(29.19)  . 26588000E+00 

(29.23) - . 74934000E+01 


(22,20)  . 18012943E-04 

(22.24) -. 43748500E+03 
(23,  3) - . 43740972E-05 
(23,  6)  . 20844650E-12 

(23.12) - . 12586335E-04 

(23.15)  . 17478962E-11 

(23.18) -. 18090725E-11 

(23.22) -. 65488426E-13 

(23.25)  . 92890359E-10 
(24,  4)  . 19115639E-07 
(24,  7) - . 13 10856 IE-08 

(24.13)  . 12884144E-06 

(24.16)  . 21251103E-11 

(24.19) -. 5650243 IE- 12 

(24.23) - .21191496E+01 

(24.28)  . 45343284E-04 
(25,  5)- . 18014936E-03 
(25,  8)- . 40429470E+00 

(25.14)  . 87660992E-05 

(25.17) -. 14902369E-04 

(25.20) -. 46614609E-03 

(25.25)  . 79502985E+00 

(25.28)  . 65648475E-04 
(26,  5)  . 28916660E-03 
(26,  8)  .6 4127573E+00 

(26 . 14)  - . 14087229E-04 

(26.17)  . 23948290E-04 

(26.20)  . 74910251E-03 

(26.25) -. 56836776E-02 

(26.28) -. 10549791E-03 
(27,  5)- . 17963545E-03 
(27,  8) - . 40471312E+00 

(27.14)  . 87568294E-05 

(27.17) -. 1 48866 10E-04 

(27.20) -. 46565316E-03 

(27.25) -. 46537377E-03 
(28,  4)  . 43106613E-04 
(28,  7)-.23945062E-05 

(28.13)  . 11493097E-03 

(28.16)  . 1 1771007E-07 

(28.19) - . 31296753E-08 

(28.23)  . 88204863E-07 

(29.14) -. 10000000E+01 

(29.17)  . 17000000E+01 

(29.20)  . 53176000E+02 

(29.25)  . 53144094E+02 
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(  1. 

1) 

.20216331E-02 

( 

2, 

1) 

.2977300SE-02 

( 

3.  1) 

.  80949911E-05 

(  4, 

D- 

.  12375691E-02 

( 

5. 

D- 

. 10778218E+00 

( 

6,  1)- 

.  17330942E+02 

(  7, 

n- 

. 23937219E-01 

( 

8, 

l) 

. 27020656E-05 

( 

9.  1) 

.  96485786E-03 

(10, 

i) 

. 35483933E+00 

(11. 

l) 

. 42431595E-08 

(12,  1) 

.  14120225E-05 

(13, 

i) 

. 39982020E-03 

(14. 

l) 

. 24990000E-01 

(17,  1) 

.  18268377E-04 

(18, 

i) 

.61804879E-08 

(19, 

D- 

. 70594865E-04 

(20,  1)- 

.  36574981E-09 

(21. 

i) 

.  44543902E-09 

(22, 

l)- 

. 88919768E-07 

(23,  1)- 

.45882275E-12 

(24. 

i) 

.  55784144E-12 

(25, 

l) 

. 23011010E-05 

(26.  1)- 

.  36978977E-05 

(27. 

i) 

.  22986677E-05 

(28, 

l) 

. 30898893E-08 

(29,  1)- 

.  26250000E+00 

MATRIX  CD  IS 

(  1. 

i) 

.  10000000E+01 

( 

2. 

2) 

. 10000000E+01 

( 

2,  4) 

.  17000000E+01 

(  2, 

6) 

. 26588000E+00 

( 

2, 

7) 

. 53176000E+02 

( 

2,12) 

.  53144094E+02 

(  3. 

3) 

. 10000000E+01 

( 

3. 

5) 

. 10350000E+01 

( 

3.  9) 

.  37467000E-01 

(  3, 

10) 

. 74934000E+01 

( 

3. 

15) 

. 74889040E+01 

( 

4.  4) 

.  10000000E+01 

(  4, 

6) 

. 15640000E+00 

( 

4, 

7) 

. 31280000E+02 

( 

4,12) 

.  31261232E+02 

(  5, 

5) 

. 10000000E+01 

( 

5, 

9) 

. 36200000E-01 

( 

5,10) 

.  72400000E+01 

(  5, 

15) 

. 72356560E+01 

( 

6. 

D- 

. 10000000E+01 

( 

6,  2) 

.  10000000E+01 

(  °. 

3)- 

. 10000000E+01 

( 

6. 

4) 

. 17000000E+01 

( 

6,  5)- 

.  10350000E+01 

(  6, 

6) 

. 26588000E+00 

( 

6. 

7) 

. 53176000E+02 

( 

6,  9)- 

.  37467000E-01 

(  6, 

10)- 

. 74934000E+01 

( 

6. 

12) 

. 53144094E+02 

( 

6,15)- 

.  74889040E+01 

(  7, 

6) 

. 10000000E+01 

( 

7. 

7) 

. 20000000E+03 

( 

7,12) 

.  19988000E+03 

(  8, 

7) 

. 10000000E+01 

( 

8, 

12) 

. 99940000E+00 

( 

9,  9) 

.  10000000E+01 

(  9. 

10) 

. 20000000E+03 

( 

9. 

15) 

. 19988000E+03 

110,10) 

.  10000000E+01 

(10, 

15) 

. 99940000E+00 

(11. 

12) 

. 10000000E+01 

(12,15) 

.  10000000E+01 

MATRIX  FD  IS 

(13,  1)  . 10000000E+01 
MATRIX  HD  IS 

ALL  ELEMENTS  ARE  ZERO 
MATRIX  D  IS 

(  1,  1)  . 26250000E+00  (  6,  1) - . 26250000E+00 
THE  COMMON  ROOTS  ELIMINATED  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-.31294747 

.71315815 

.77880078 

.40183250 

2 

-.31294747 

-.71315815 

.77880078 

.40183250 

3 

.94101122 

. 37660536E-01 

.94176453 

-.99920011 

4 

.94101122 

- .  37660536E-01 

.94176453 

-.99920011 

5 

.79026159 

.  38037728E-02 

.79027075 

-.99998842 

6 

.79026159 

- . 38037728E-02 

.79027075 

-.99998842 

7 

-.29118674 

.95415875 

.99760144 

.29188685 

8 

-.29118674 

-.95415875 

.99760144 

.29188685 

9 

-.29118674 

.95415875 

.99760144 

.29188685 

10 

-.29118674 

-.95415875 

.99760144 

.29188685 

11 

1.0000000 

0. 

12 

1.0000000 

0. 

13 

1 . 0000000 

0. 
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14 

0. 

0. 

15 

0. 

0. 

16 

0. 

0. 

17 

0. 

0. 

18 

0. 

0. 

THE 

NUMERATOR  ROOTS 

OF  ZR0QT20  i 

IRE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-.41065843 

.44636207 

.60653066 

.67706128 

2 

-.41065843 

-.44636207 

.60653066 

.67706128 

3 

-5.7589334 

0. 

4 

-.58234746 

0. 

5 

- . 60763833E- 

-01 

0. 

6 

.22314408 

0. 

7 

.97044554 

0. 

8 

.65670000 

0. 

9 

.90480000 

0. 

10 

.74067933 

0. 

LOW 

ORDER  NON-ZERO 

COEFFICIENT  = 

. 48793794E-05 

THE 

DENOMINATOR  ROOTS  OF  ZROOT20 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-.41054248 

.44564184 

.60592225 

.67754977 

2 

-.41054248 

-.44564184 

.60592225 

.67754977 

3 

.11183079 

.33415974 

.35237602 

-.31736209 

4 

.11183079 

-.33415974 

.35237602 

-.31736209 

5 

.78264773 

.46194650 

.90880803 

-.86118047 

6 

.78264773 

-.46194650 

.90880803 

-.86118047 

7 

.98209324 

. 38796381E-01 

.98285924 

-.99922064 

8 

.98209324 

- . 38796381E-01 

.98285924 

- . 99922064 

9 

.10724478 

0. 

10 

.95123134 

0. 

11 

.73936134 

0. 

LOW 

ORDER  NON-ZERO 

COEFFICIENT  = 

.  91292656E -03 

DEGREE  OF  NUMERATOR  OF  ZPTF20  IS  10  (COEFFICIENTS  IN  ASCENDING  ORDER) 
.000004879379396761  .00005422670196196  -.0004301053238645  .00007394109461729 
.001529946348813  .0004949714772774  -.003406972769759  -.002694751973388 
.007544221803876  -.002500815466003  -.0006726975577703 

DEGREE  OF  DENOMINATOR  OF  ZPTF20  IS  11  (COEFFICIENTS  IN  ASCENDING  ORDER) 
.0009129265648695  -.01389618083208  .06933246273983  -.221239191441  .4571646325039 
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-.6147399572023  .879480873489  -1.882099936496  3.152525897068  -3.06864018641 
1.573964481339  -.3327693623257 


L _ I 

The  computed  closed  loop  transfer  function  is  stored  in  SPTF20-  This  transfer  function  is  used  in 
Step  6  to  compute  the  step  response  by  recursive  evaluation  of  a  difference  equation.  The  response 
at  every  .5  sec  is 


Time 

c(t) 

.00000 

.00000 

.50000 

.85369 

1.0000  ~ 

1.2902 

1.5000 

1.2067 

2.0000 

.95335 

2.5000 

.80423 

3.0000 

.80329 

3.5000 

.86517 

4.0000 

.90975 

fmal  value 

.89135 

The  low  resolution  printer  plot  is  not  presented.  However,  the  high  resolution  plot  is  presented  in 
Appendix  H. 

The  step  response  computed  by  the  state  space  method  in  Step  7  is 


Time 

c(t) 

.00000 

.00000 

.50000 

.85374 

1.0000 

1.2903 

1.5000 

1.2067 

2.0000 

.95341 

2.5000 

.80427 

3.0000 

.80333 

3.5000 

.86521 

4.0000 

.90980 

The  underscored  digits  represents  the  difference  between  the  two  methods  used  to  compute  the 
time  response. 

After  the  loop  is  opened  in  Step  8,  the  command  B2TF  is  used  to  compute  the  open  loop  transfer 
function.  Since  the  format  of  the  output  is  the  same  as  above,  only  the  final  result  of  this  open 
loop  transfer  function  is  presented  next: 


I - , 

THE  C0MM0H  ROOTS  ELIMIHATED  ARE 

HO .  REAL  IMAG .  OMEGA  ZETA 
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1 

-.31294747 

.71315815 

.77880078 

.40183250 

2 

-.31294747 

-.71315815 

.77880078 

.40183250 

3 

-.29118674 

.95415875 

.99760144 

.29188685 

4 

-.29118674 

-.95415875 

.99760144 

.29188685 

5 

.79026159 

. 38037728E-02 

.79027075 

-.99998842 

6 

.79026159 

-.38037728E-02 

.79027075 

-.99998842 

7 

.94101122 

. 37660536E-01 

.94176453 

-.99920011 

8 

.94101122 

- . 37660536E-01 

.94176453 

-.99920011 

9 

1.0000000 

0. 

10 

1.0000000 

0. 

11 

1.0000000 

0. 

12 

0. 

0. 

13 

0. 

0. 

14 

0. 

0. 

15 

0. 

0. 

THE  NUMERATOR  ROOTS 

OF  ZR00T21  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-.39529203 

.46638977 

.61137158 

.64656592 

2 

-.39529203 

-.46638977 

.61137158 

.64656592 

3 

-.29216671 

.95633069 

.99996489 

.29217697 

4 

-.29216671 

-.95633069 

.99996489 

.29217697 

5 

-51.617763 

0. 

6 

-2.5632083 

0. 

7 

-.19110339 

0. 

8 

- . 17540986E 

-01  0. 

9 

- . 14233756E 

-04  0. 

10 

.97044654 

0. 

11 

. 96080000 

0. 

12 

.74067933 

0. 

13 

1.0000000 

0. 

LOW  ORDER  NON-ZERO 

COEFFICIENT  = 

27926697E-09 

THE  DENOMINATOR  ROOTS  OF  ZR00T21  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-.41065843 

.44636207 

.60653066 

.67706128 

2 

-.41065843 

-.44636207 

.60653066 

.67706128 

3 

.26328657 

.28713091 

.38956896 

-.67584072 

4 

.26328657 

-.28713091 

.38956896 

-.67584072 

5 

-.29118696 

.95415864 

.99760140 

.29188708 

6 

-.29118696 

-.95415864 

.99760140 

.29188708 

7 

.97879382 

. 60296480E-01 

.98064928 

-.99810793 

8 

.97879382 

- .60296480E-01 

.98064928 

-.99810793 

9-76 


9 

.66670000 

0 

10 

.22314408 

0 

11 

.52543884 

0 

12 

.70477617 

0 

13 

.94753751 

0 

14 

0. 

0 

LOW  ORDER  NON-ZERO  COEFFICIENT  =  .932S6827E-03 

DEGREE  OF  NUMERATOR  OF  ZPTF21  IS  13  (COEFFICIENTS  IN  ASCENDING  ORDER) 
2. 792669697423E-10  .00001963706374265  .001195505178997  .004241776865733 
-.008278125644938  -.006740054966407  -.01146909059935  .04160133030724 
-.01510067489718  .01702852x77761  -.03511243507414  .003514176091163 
. 008928046689292  . 0001713879289734 

DEGREE  OF  DENOMINATOR  OF  ZPTF21  IS  14  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.  .0009326682745349  -.01216657050936  .06636119463434  -.2029143353218 
.3906411170752  -.5810105254174  1.020725122821  -2.000267252651 
2.951993409726  -3.150221313651  2.949423552319  -2.486008740129 
1.386835615943  -.3343330135187 


J 


Note  that  the  order  of  the  closed  loop  transfer  function  can  be  reduced  since  the  zero  at  -.1423E-4 
is  nearly  zero  and  its  effect  is  essentially  canceled  by  the  pole  at  the  origin.  Also  the  degree  of 
the  numerator  can  be  reduced  by  an  additional  order  since  the  zero  at  -51.618  has  no  effect  on  the 
transfer  function  over  the  range  of  frequency  of  interest.  This  zero  behaves  like  a  zero  at  minus 
infinity  and  thus  may  be  deleted. 


In  Step  10  the  open  loop  frequency  response  is  evaluated  from  the  rational  transfer  function  com¬ 
puted  in  Step  9.  A  portion  of  the  output  from  this  step  is  given  below  at  0.01,  0.1,  1.0.,  and  25. 
Hz.  The  low  resolution  printer  plots  are  not  presented.  However,  the  high  resolution  plots  are 
presented  in  Appendix  H. 


************************************************************ 

*  ZFREQ  -  FREQUENCY  RESPONSE  OF  Z-PLANE  TRANSFER  * 

*  FUNCTION  21  * 

%*********************************************************** 

SAMPLING  PERIOD  =  .2000E-01 

AUTOMATIC  FREQUENCY  MODE  IF  FAUTO.NE.O,  FAUTO  =  1.000 
NOMEGA  =  4.000  OMEGA  =  .10002-01,  .1000  ,1.000  ,25.00 

OMEGA  ZREAL  ZIMAG  REAL  IMAGINARY  DB  PHASE  PHASE 
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HZ  MARGIN 


1000E-01 

1.000 

.001 

. 273E-03 

- . 898E-02 

-40.934 

-88.26 

91.74 

1300E-01 

1.000 

.002 

•462E-03 

- . 117E-01 

-38.647 

-87.74 

92.26 

. 9600E-01 

1.000 

.012 

. 254E-01 

- . 939E-01 

-20.238 

-74.87 

105.13 

.1000 

1.000 

.013 

. 276E-01 

-.986E-01 

-19.798 

-74.37 

105.63 

.1240 

1.000 

.016 

.425E-01 

- .  129E+00 

-17.364 

-71.71 

108.29 

.9151 

1.000 

1 . 160 

.993 

.992 

.989 

.115 

.125 

.145 

- . 153E+01 

- . 138E+01 

- . 113E+01 

. 642E+00 

. 768E+00 

. 929E+00 

4.409 

3.963 

3.317 

-202.75 

-209.13 

-219.36 

-22.75 

-29.13 

-39.36 

24.30 

25.00 

-.996 

-1.000 

.088 

.000 

. 677E-02 

.683E-02 

. 126E-02 

•217E-15 

-43.237 

-43.318 

-349.47 

-360.00 

-169.47 

-180.00 

I _ I 

In  Step  11  the  open  loop  frequency  response  is  evaluated  directly  from  the  state  space  representa¬ 
tion.  A  portion  of  the  output  from  this  step  is  given  below  at  0.01,  0.1,  1.0.,  and  25.  Hz.  No  plots 
are  presented  since  the  response  is  essentially  identical  to  that  computed  in  Step  10. 

I - 1 


INPUT  IS  CONNECTED  TO  BLOCK  D6 
MAGNITUDE  OF  INPUT  =  1.0000 

BLOCK  D2  IS  THE  OUTPUT 


********************************************************************** 
*  B2FREQ  -  BL0CK2 :  FREQUENCY  RESPONSE  FROM  D6  TO  D2  * 

********************************************************************** 


BASIC  SAMPLING  PERIOD  COMPUTED  =  .S0000E-03 

LCM  SAMPLING  PERIOD  COMPUTED  =  .20000E-01 

TOTAL  NUMBER  OF  TIME  SEGMENTS  COMPUTED  =  40 


SAMPLING  PERIOD  =  .2000E-01 
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AUTOMATIC  FREQUENCY  MODE  IF  FAUTO.NE.O,  FAUTO  =  1.000 


N0MEGA  =  4.000 

OMEGA 

=  . 1000E-01 ,  .1000 

,  1.000 

,  25.00 

a 

OMEGA  ZREAL 

ZIMAG 

REAL 

IMAGINARY 

DB 

PHASE 

PHASE 

HZ 

. 1000E-01  1.000 

.001 

. 273E-03 

- , 898E-02 

-40.934 

-88.26 

MARGIN 

91.74 

.1300E-01  1.000 

.002 

.462E-03 

- . 117E-01 

-38.647 

-87.74 

92.26 

. 9600E-01 

1.000 

.012 

. 254E-01 

- . 939E-01 

-20.238 

-74.87 

105.13 

.1000 

1.000 

.013 

. 276E-01 

- . 986E-01 

-19.799 

-74.37 

105.63 

.1240 

1.000 

.016 

. 425E-01 

- . 129E+00 

-17.364 

-71.71 

108.29 

.9151 

1.000 

1.160 

.993 

.992 

.989 

.115 

.125 

.145 

- . 153E+01 

- . 138E+01 

- . 113E+01 

. 642E+00 

.768E+00 

. 929E+00 

4.409 

3.962 

3.316 

-202.75 

-209.13 

-219.36 

-22.75 

-29.13 

-39.36 

24.30 

25.00 

-.996 

-1.000 

.088 

.000 

. 677E-02 

.682E-02 

. 126E-02 

.248E-09 

-43.238 

-43.318 

-349.46 

-360.00 

-169.46 

-180.00 

I _ I 

The  only  difference  between  the  tabular  output  from  these  frequency  response  commands  are  the 
last  significant  digits  for  dB  at  omega  =  0.1  and  1.0. 

The  system  eigenvalues  could  have  been  computed  with  command  B2EIG.  However,  since  the  closed 
loop  transfer  function  was  computed  in  Step  5,  the  eigenvalues  are  equal  to  the  denominator  roots 
of  ZPTF20  plus  the  common  roots  which  were  eliminated. 
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9.8  Example  21  IEEE  CACSD  Benchmark  Problem  No.  3,  4-Rate 
Model  (classical  multirate  transform  method) 

Solution  of  the  4-rate  sampled-data  model  from  the  IEEE  CACSD  Benchmark  Problem  No.  3  [5] 
is  presented  in  this  example  using  classical  multirate  transform  methods.  This  method  of  analysis 
is  based  on  the  block  diagram  reduction  method  in  which  fast  rate  transforms  are  converted  to  the 
slowest  sampling  rate.  The  block  diagram  of  this  problem,  labeled  in  terms  of  the  LCAP2  SPTF; 
and  ZPTFi  transfer  functions,  is  given  in  Figure  9.11. 


Figure  9.11:  Block  Diagram  for  IEEE  Benchmark  4-Rate  Model 


Problem  statement,  system  parameters,  and  transfer  functions  are  the  same  as  those  given  in 
Example  20. 

The  same  methodology  as  in  Example  19  will  be  used  to  reduce  the  block  diagram  to  a  single  rate 
rate  system.  For  computational  reasons,  however,  the  analysis  will  be  done  in  the  w  plane  instead 
of  the  z  plane.  A  change  in  notation  for  defining  transforms  with  different  sampling  periods  will 
be  made  so  that  it  will  be  more  explicit  and  also  consistent  with  that  used  by  LCAP2  commands. 
The  sampling  period  of  the  slowest  sampler  will  be  denoted  by  T  so  that  the  w  transform  of  a 
continuous  transform  G(s)  is  denoted  by 

Wt{G(s)}  =  Gt{w) 

If  G(s)  is  sampled  at  a  rate  n  (an  integer)  times  faster,  the  faster  rate  w  transform  of  G(s)  is 
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denoted  by 


WT/n{G(s)}  =  GT/n{wn) 

where  wn  =  (zn-l)/(zn+l)  and  zn  =  (z]1/,n  since  z  =  etT  and  zn  =  e'r/n. 

The  first  step  in  simplifying  the  block  diagram  is  to  compute  the  w  transforms  from  eT(w)  to  the 
outputs  of  Gg(s)  and  Gio(s)  at  the  sampling  rates  corresponding  to  periods  T4  =  T/40  and  T3  = 
T/20,  respectively.  Before  doing  this  though,  the  following  block  diagram  reduction  is  performed 


G19  _  G 9  *  G 1  *  G 8i  *  G 82 
and 

G21  =  G 10  *  G 2  *  G si  *  G 82 


so  that  there  will  be  only  a  single  s  plane  transfer  function  between  the  ZOH  and  the  output  of  the 
two  fastest  samplers. 

Applying  the  slow-to-fast  multirate  relationship 

CT/n{wn)  =  Wr/n{G(s)}  *  Et{w) 


to  the  following  system 


CT/"(wn) 


WT/n{G(s)} 


the  transfer  function  between  er(w)  and  the  output  of  Gig(s)  at  the  sampling  rate  corresponding 
to  period  T/40  is  given  by1 

1  _ 

G3. 4*°(w4o)  -  w  transform  of  ZT^°{ - Gi9(s)} 

s 

which  is  to  be  computed  with  command  SWMRX.  The  arguments  of  SWMRX  will  be  selected  so 
that  the  resulting  w  transform  will  be  stored  in  WPTF34.  Similarly,  the  transfer  function  from 
eT(w)  to  the  output  of  G2i(s)  at  the  sampling  rate  corresponding  to  period  T/20  will  be  computed 
and  stored  in  WPTF50. 

Next,  transform  each  of  the  z  plane  transfer  functions  into  the  w  plane  and  store  the  results  into 
the  WPTFi’s  with  the  same  identifiers,  i.e.,  WPTF;  =  w  transform  of  ZPTF;.  Computing  the 
products 

‘See  Example  19  for  z  plane  equivalent 
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WPTF61  =  WPTFs  *  WPTF131  *  WPTF132 

and 

wptf72  =  WPTFt  *  wptf131  *  wptf,32 

Figure  9.11  can  now  be  redrawn  in  terms  of  w  plane  transforms  as  shown  in  Figure  9.12. 


Gs(w)  g£/4(w4)  g[/20(w20)  G[0/20(w20) 


Figure  9.12:  Multirate  Rate  W  Plane  Transfer  Function  Representation  for  4-Rate  Model 

The  next  step  in  simplifying  the  block  diagram  is  to  transform  the  faster  rate  w  transforms  to  a 
slower  rate.  First  compute  the  products 

G[0/40(iU4o)  =  gT/40(w40)  *  G34/40(w40) 
and 

G51/20(W2o)  =  GT2/20(w20)  *  G[0/20(w4) 

and  store  them  into  WPTF40  and  WPTF51,  respectively.  Then  using  the  w  plane  equivalent  of 
the  z  plane  fast-to-slow  multirate  relationship 

n  Za 

the  transfer  function  between  eT(w)  and  the  sampled  output1  of  G40T^40(w40)  is  computed  with 
command  WMRXFM.  The  arguments  of  WMRXFM  will  be  selected  so  that  the  resultant  transform 

'Sampling  period  =  T/4 
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is  stored  in  WPTF44.  Similarly,  the  transfer  function  between  er(w)  and  the  sampled  output1  of 
q6iT/20(w20)  js  computed  and  stored  in  WPTF52. 

Applying  this  same  procedure  to  the  transfer  functions, 

G42/4(U,T/4)  =  G614(U’ 4)  *  GIl/4(^4) 
and 

G53/4(W4)  =  Gj, 24(W4)  *  Gl'\Wi) 

compute  transfer  functions  from  er(w)  to  the  sampled  outputs2  of  G4 2r/4(w4)  and  G53T/4(w4),  and 
then  store  into  WPTF43  and  WPTFs4,  respectively. 

The  block  diagram  can  now  be  simplified  to  the  single  rate  system  in  Figure  9.13. 


Gf(w)  a J,(w) 

Figure  9.13:  Slow  Rate  W  Plane  Transfer  Function  Representation  for  4-Rate  Model 

By  inspection  from  Figure  9.13,  the  open  loop  transfer  function  with  the  inner  loop  broken  between 
a  and  0,  as  defined  in  [5],  is 

1  +  Gj(w)  *  G{4(w) 

'Sampling  period  =  T/4 
’Sampling  period  =  T 
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The  closed  loop  transfer  function  from  rT(w)  to  the  output  of  c(s)  sampled  at  the  slowest  sampling 
rate  is  not  readily  determined  from  Figure  9.13  since  the  output  does  not  appear  explicitly.  The 
desired  closed  loop  transfer  function,  though,  can  be  computed  as 


eT(w)  ~Gj{w) 

Rt{w)  1  +  Gl(w)  *  G{4(w)  -  Gj(w)  *  GJ3(w) 

Since  there  are  many  steps  involved  in  the  solution  of  this  problem,  the  PRECMP  precompiler  will 
be  used.  The  PRECMP  code  is: 

r - 1 

C  IEEE  CACSD  BENCHMARK  PROBLEM  NO.  3,  4-RATE  MODEL 
C 

C  1.  ****  LOAD  IN  S  PLANE  TRANSFER  FUNCTIONS  **** 

•POLYN  1  -15*1.5  -15 
*P0LYD  2  13  6  1 
♦SPLDC  1 
C 

*P0LYN  1  9  -.1 
*PQLYD  2  13  6  1 
•SPLDC  2 
C 

•POLYN  0  200. *200. 

*P0LYD  3  0.  200. *200.  2. *.126*200.  1. 

•SPLDC  9 
C 

•POLYN  0  100. *100. 

•POLYD  3  0.  100. *100.  2. *.125*100.  1. 

•SPLDC  10 
C 

•POLYN  0  62.8*62.8 
•POLYD  2  62.8*62.8  94.25  1 
•SPLDC  81 
C 

♦POLYN  0  1 
•POLYD  1  1  .03 
•SPLDC  82 
C 

C  2.  ****  ENTER  SAMPLING  PERIODS  **** 

Tl=l/50 . 
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T2=l/200 . 

T3=l/1000 . 

T4=l/2000 . 

C 

C  3.  ****  LOAD  IN  Z  PLANE  TRANSFER  FUNCTIONS  **** 

♦POLYN  1  -.2625*. 9048  .2625 

♦POLYD  1-11 

♦ZPLDC  3 

C 

♦POLYN  1  -1.7*. 9608  1.7 
*POLYD  1  -.6667  1 
*ZPLDC  4 
C 

♦POLYN  1  -1.035*. 9324  1.035 
♦POLYP  1-11 
♦ZPLDC  5 
C 

•POLYN  1  .1564  .1564 
♦POLYD  1  -.6873  1.0 
♦ZPLDC  6 
C 

♦POLYN  1  .0362  .0362 
♦POLYD  1  -.9277  1 
♦ZPLDC  7 
C 

♦POLYN  2  .9942  -.9942*1.6179  .9942 
♦POLYD  3  0.  .9883  -1.6084  1. 

♦ZPLDC  11 
C 

♦POLYN  0  1 
♦POLYD  101 
♦ZPLDC  12 
C 

♦POLYN  0  1 
♦POLYD  0  1 
♦ZPLDC  15 
C 

♦POLYN  1-11 
♦POLYD  1  0  T2 
♦ZPLDC  131 
C 

♦POLYN  2  .9994  -.9994*1.786  .9994 
♦POLYD  2  .9988  -1.785  1. 

♦ZPLDC  132 
C 

C  4.  *****  COMPUTE  S-W  TRANSFORM  OF  INNER  LOOP  ***** 

C 

♦SPMPY  8  81  82 
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!  ALSO  USED  LATER  15  STEP  5 


♦SPRTS  8 
•SPRTS  9 
♦SPRTS  1 
♦SPMPY  19  1  8 
♦SPEQU  120  19  !  SAVE  FOR  LATER  USE  IN  STEP  19 

♦SPHPY  19  19  9 
SAMPT=T4 
NTGER=40 

♦SWHRX  34  19  !  VPTF34  IS  THE  TRANSFORM  FROM  ETA  TO  THE  SAMPLED  OUTPUT 
C  OF  G9(S)  AT  T4 

C 

C  5.  *****  COMPUTE  S-W  TRANSFORM  OF  OUTER  LOOP  ***** 

C 

•SPRTS  2 
*SPRTS  10 
*SPMPY  20  8  2 
*SPMPY  21  20  10 
SAMPT=T3 
NTGER=20 

♦SWMRX  50  21  !  WPTF50  IS  THE  TRANSFER  FUNCTION  FROM  ETA  TO  THE  SAMPLED 
C  OUTPUT  G10(S)  WITH  SAMPLING  PERIOD  T3 

C 

C  6.  *****  TRANSFORM  ALL  THE  Z  PLANE  TRANSFER  FUNCTIONS  TO  THE  W 

C  *****  PLANE  SO  THAT  BLOCK  DIAGRAM  REDUCTION  CAN  BE  CARRIED  OUT 

C  *****  WITH  BETTER  ACCURACY  LATER 

C 

SAMPT=T1 
♦ZPRTS  3 
♦ZWXFM  3  3 
♦ZWXFM  4  4 
♦ZWXFM  5  5 

SAMPT=T2 
♦ZWXFM  6  6 
♦ZWXFM  7  7 
♦ZWXFM  131  131 
*ZWXFM  132  132 
SAMPT=T3 
*ZWXFM  12  12 

SAHPT=T4 


♦ZWXFM 

11 

11 

C 

C  7 

. 

*****  MULTIPLY 

G5*G131*G132 

AND 

STORE 

INTO 

G61 

C 

*****  MULTIPLY 

G7*G131*G132 

AND 

STORE 

INTO 

G72 

C 

♦WPMPY 

60 

6  131 

♦WPMPY 

61 

60  132 

C 

♦WPMPY 

71 

7  131 
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•WPMPY  72  71  132 
C 

C  8.  *****  MULTIPLY  Gil  AND  G34  AND  TRANSFORM  DOWN  TO  T2 

C 

*WPMPY  40  11  34 
SAMPT=T2 
NTGER=10 

*WMRXFM  41  40  !  WPTF41  IS  THE  FAST-TO-SLOW  TRANSFORM  FROM  ETA  TO 
C  THE  SAMPLED  OUTPUT  OF  Gil 

C 

c  9.  *****  MULTIPLY  G12  AND  GSO  AND  TRANSFORM  DOWN  TO  T2 

♦WPMPY  51  12  50 
SAMPT=T2 
NTGER=5 

♦WMRXFM  52  51  !  WPTF52  IS  THE  FAST-TO-SLOW  TRANSFORM  FROM  ETA  TO 
C  THE  SAMPLED  OUTPUT  OF  GSO 

C 

c  10.  *****  MULTIPLY  G61  AND  G41  AND  TRANSFORM  DOWN  TO  T1 

C 

*WPMPY  42  61  41 

*WELCR  42  !  ELIMINATE  COMMON  ROOTS 

SAMPT= . 02 
NTGER=4 

♦WMRXFM  43  42  !  WPTF43  IS  THE  TRANSFORM  FROM  ETA  TO  THE  OUTPUT  OF  G6 
C 

C  11.  *****  MULTIPLY  G72  AND  G52  AND  TRANSFORM  DOWN  TO  T1 

C 

* WPMPY  53  72  52 
•WELCR  53 

SAMPT= . 02 
NTGER=4 

* WMRIFM  54  53  !  WPTF54  IS  THE  TRANSFORM  FROM  ETA  TO  THE  OUTPUT  OF  G7 
C 

C  12.  *****  COMPUTE  INNER  LOOP  TRANSFER  FUNCTION 

C 

*WPMPY  44  4  43  !  WPTF44  IS  INNER  LOOP  TRANSFER  FUNCTION  AT  THE  SLOWEST 
C  RATE 

♦WZXFM  44  44  !  COMPUTE  EQUIVALENT  Z  PLANE  TRANSFER  FUNCTION 

C 

C  13.  *****  COMPUTE  OUTER  LOOP  TRANSFER  FUNCTION 

C 

♦WPMPY  55  5  54  !  WPTF55  IS  THE  OUTER  LOOP  TRANSFER  FUNCTION  AT  THE 

C  SLOWEST  RATE 

♦WZXFM  55  55 
C 

C  14.  *****  COMPUTE  OPEN  INNER  LOOP,  CLOSED  OUTER  LOOP  TRANSFER 

C  FUNCTION 

C 
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*CPYVP  55  6  7 
*PADD  876 

•CPYPW  60  7  8  !  WPTF60  IS  THE  CLOSED  OUTER  LOOP  ONLY  T.F. 

*WELCR  60 

•WPMPY  61  60  44  !  WPTF61  IS  THE  CLOSED  LOOP  T.F.  IN  SERIES  WITH  OPEN 
C  INNER  LOOP,  I.E.,  BENCHMARK  OPEN  LOOP  T.F. 

*WELCR  61 

*WZXFM  61  61  !  COMPUTE  EQUIVALENT  Z  PLANE  TRANSFER  FUNCTION 

C 

C  15.  *****  COMPUTE  OPEN  LOOP  TRANSFER  FUNCTION 

C 

TITLE2=’0P£N  INNER  LOOP,  CLOSED  OUTER  LOOP' 

N0MEGA=4 

♦OMEGA  .01  .1  1.  25 
RAD=0 

CALL  ZFREQ(61) 

C 

C  16. 

C 

*WPSUB  45 
*WPADD  46 
*CPYWP  46 
*CPYPW  47 
♦ROOTN  -1 
♦ROOTD  1 
*WPLDR  35 
*WPMPY  36 
*WPMPY  48 
*WZXFM  48 
C 

C  17. 

C 

SAMPT=T1 

*SWXFM  73  120  !  SPTF120  =G1*G81*G82  FROM  STEP  4 

*WZXFM  73  73  !  Z  PLANE  EQUIVALENT 

C 

C  18.  *****  COMPUTE  CLOSED  LOOP  T.F.  FROM  R  TO  C 
C 

+WPMPY  74  48  73 
*WELCR  74 
♦WZXFM  74  74 
C 

C  19.  *****  COMPUTE  TIME  RESPONSE 
C 

TEND=4 
*ZTIME  74 


*****  COMPUTE  CLOSED  LOOP  TRANSFER  FUNCTION  FROM  R  TO  ETA 
COMPUTE  G55-G44  FIRST,  THEN  ADD  1 

55  44 

0  45  !  FORM  CLOSED  LOOP  DENOMINATOR 

1  2 
2  1 


!  LOAD  IN  NEGATIVE  UNITY  TRANSFER  FUNCTION 

35  3  !  NEGATIVE  OF  G3 

36  47  !  R  TO  ETA  TRANSFER  FUNCTION 

48 

*****  COMPUTE  TRANSFER  FUNCTION  FROM  ETA  TO  OUTPUT  OF  G1 


l 
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Since  the  complete  output  of  the  example  is  too  long  to  be  included  in  this  report,  only  a  portion 
of  it  will  be  presented.  The  output  from  the  last  part  of  Step  14  for  the  open  loop  transfer  function 
is: 


I  | 


THE 

NUMERATOR  ROOTS 

OF  WR00T61  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-1.0733873 

1.5999544 

1.9266589 

0.55712367 

2 

-1.0733873 

-1.5999544 

1.9266589 

0.55712367 

3 

0.00000000 

1.3511342 

1.3511342 

0.00000000 

4 

0.00000000 

-1.3511342 

1.3511342 

0.00000000 

S 

-0.14897670 

0.00000000 

6 

-0 . 19991840E-01 

0.00000000 

7 

-1.0357747 

0.00000000 

8 

-1.4737498 

0.00000000 

9 

-0 . 14998874E-01 

0.00000000 

10 

2.2700451 

0.00000000 

11 

1.0000000 

0.00000000 

12 

1.0000000 

0.00000000 

13 

0.00000000 

0.00000000 

LOW  ORDER  NON-ZERO  COEFFICIENT  =  -0. 13312953E+20 

THE  DENOMINATOR  ROOTS  OF  WR00T61  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-0 . 97634013E-02 

0 . 30764673E-01 

0 . 32276758E-01 

0.30249015 

2 

-0 . 97634013E-02 

-0 . 30764673E-01 

0.32276758E-01 

0.30249015 

3 

-0.50540411 

0.34215228 

0.61032901 

0.82808470 

4 

-0.50540411 

-0.34215228 

0.61032901 

0.82808470 

5 

-0 . 33913135E-02 

-1.3507008 

1.3507050 

0 . 25107729E-02 

6 

-0 . 33913135E-02 

1.3507008 

1.3507050 

0 . 25107729E-02 

7 

-1.1565382 

-1.6333429 

2.0013470 

0.57787992 

8 

-1.1665382 

1.6333429 

2.0013470 

0.57787992 

9 

-0.31101028 

0.00000000 

10 

-0 . 26944074E-01 

0.00000000 

11 

-0.17328293 

0.00000000 

12 

-0.19997600 

0.00000000 

13 

-0.63513034 

0.00000000 

LOW  ORDER  NON-ZERO  COEFFICIENT  =  0.93280167E+18 

DEGREE  OF  NUMERATOR  OF  WPTF61  IS  13  (COEFFICIENTS  IN  ASCENDING  ORDER) 
0.,  -1 . 3312952872023E+19,  -1 .6399740836515E+21,  -5.4452S0935S898E+22, 
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-2.8421610640591E+23,  1 . 266281022S986E+23 ,  3 . 4134558629905E+23 , 
5.0287701238749E+22,  4. 1786774841579E+22,  -1.0373604396277E+23. 
-1 . 12889794467E+23 ,  -2.30289S5865751E+22,  7 . 236988737753E+21 , 

1 . 2691543716862E+22 


DEGREE  OF  DENOMINATOR  OF  WPTF61  IS  13  (COEFFICIENTS  IN  ASCENDING  ORDER) 


9. 3280167336848E+17, 
7 . 0261008123621E+22, 
2 . 0595550948577E+25, 
6 . 2148229594923E+25, 
8 . 3764301370234E+24, 


6 . 969290877352E+19 ,  2 . 6590748134695E+21 , 

8 . 7589499053923E+23 ,  S . 6428241409147E+24, 
4 . 549890087997E+25 ,  6 . 4451034098508E+25 , 

4 . 46072760091 74E+25 ,  2 . 4542124379376E+2S , 

1 . 7835330185289E+24 


************************************************************ 

*  ZR00T61  =  BILINEAR  TRANSFORM  OF  WR00T61  * 

*  ZPTF61  =  BILINEAR  TRANSFORM  OF  WPTF61  * 

************************************************************ 


THE  NUMERATOR  ROOTS  OF  ZR00T61  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-0.39540718 

0.46654138 

0.61156169 

0.64655322 

2 

-0.39540718 

-0.46654138 

0.61156169 

0.64655322 

3 

-0.29217661 

0.95636438 

1.0000000 

0.29217661 

4 

-0.29217661 

-0.95636438 

1.0000000 

0.29217661 

5 

0.74067933 

0.00000000 

6 

0.96080000 

0.00000000 

7 

-0.17573004E 

-01 

0.00000000 

8 

-0.19151080 

0. 00000000 

9 

0 . 97044554 

0.00000000 

10 

-2.5747472 

0.00000000 

11 

1 . 0000000 

0.00000000 

LOW 

ORDER  NON-ZERO 

COEFFICIENT  = 

0 . 41882625E+22 

THE 

DENOMINATOR 

ROOTS  OF  ZR00T61 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

0.97882516 

0.60289280E- 

■01 

0.98068011 

-0.99810850 

2 

0.97882516 

-0.60289280E- 

■01 

0.98068011 

-0.99810850 

3 

0.26328869 

0.28712364 

0.38956504 

-0.67585298 

4 

0.26328869 

-0.28712364 

0.38956504 

-0.67585298 

5 

-0.29118674 

-0.95415875 

0.99760144 

0.29188685 

6 

-0.29118674 

0.95415875 

0.99760144 

0.29188685 

7 

-0.41065841 

-0.44636208 

0.60653066 

0.67706126 

8 

-0.41065841 

0.44636208 

0.60653066 

0.67706126 

9 

0.52554105 

0.00000000 
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10 

0.94752572 

0.00000000 

11 

0.70461868 

0 . 00000000 

12 

0.66670000 

0.00000000 

13 

0.22314408 

0.00000000 

LOW  ORDER  NON-ZERO  COEFFICIENT  =  0 . 19427413E+24 


DEGREE  OF  NUMERATOR  OF  ZPTF61  IS  11  (COEFFICIENTS  IN  ASCENDING  ORDER) 
4. 1882625390881E+21 ,  2.5461667592719E+23,  8 . 9S65372S0534SE+23, 

-1 . 7798770917227E+24,  -1 . 3951755142514E+24 ,  -2 . 4039478354671E+24, 

8 . 88912975S9332E+24,  -3 . 3955475726709E+24,  3.6908799257938E+24, 

-7.5426920837511E+24,  9 . 1146461099771E+23 ,  1 . 8713071416086E+24 


DEGREE  OF  DENOMINATOR  OF  ZPTF61  IS  13  (COEFFICIENTS  IN  ASCENDING  ORDER) 

1 . 9427413082725E+23 ,  -2 . 534S58810S645E+24,  1 . 3824479248473E+25 , 

-4 . 227 1496 13284E+2S ,  8 . 1378970293103E+25,  -1 . 210369810369E+26, 

2. 1263936207461E+26 ,  -4. 1669902568819E+26 ,  6 . 149637S814687E+26 , 

-6 . 56259 19 15583 1E+26 ,  6 . 144285S49972E+26,  -5 . 178888157091E+26, 

2 . 8890745689353E+26 ,  -6 . 9648697226S38E+2E 

I _ I 

This  open  loop  transfer  function  is  almost  identical  to  the  one  computed  in  Example  20  (ZPTF21) 
using  the  Kalman-Bertram  method.  The  order  of  the  transfer  function  is  lower  since  (1)  there  is 
not  a  zero-pole  combination  near  the  origin  which  can  be  canceled  and  (2)  the  is  no  neglibile  zero 
at  -51.617  as  in  ZP.TF21  in  Example  20.  The  differences  in  the  remaining  roots  between  these 
two  examples  are  underscored  above.  The  coefficients  are  not  the  same  since  they  are  normalized 
differently. 

A  portion  of  the  frequency  response  from  Step  15,  together  with  the  difference  between  Examples 
20  and  21  underscored,  is  given  below. 


1 


************************************************************ 

*  ZFREQ  -  FREQUENCY  RESPONSE  OF  Z-PLANE  TRANSFER  * 

*  FUNCTION  61  * 

************************************************************ 


SAMPLING  PERIOD  =0.2000E-01 


AUTOMATIC  FREQUENCY  MODE  IF  FAUT0.NE.0,  FAUTO  =  1.000 


NOMEGA  =  4 

.000 

OMEGA 

II 

O 

H* 

O 

O 

O 

M 

-01,0.1000 

,  1.000 

,  25.00 

f 

OMEGA 

ZREAL 

ZIMAG 

REAL 

IMAGINARY 

DB 

PHASE 

PHASE 

HZ 

MARGIN 

. 1000E-01 

1.000 

.001 

. 273E-03 

- . 898E-02 

-40.935 

-88.26 

91.74 

. 1300E-01 

1.000 

.002 

.462E-03 

- . 117E-01 

-38.647 

-87.74 

92.26 

9-91 


. 9600E-01 

.1000 

.1240 

1.000 

1.000 

1.000 

.012 

.013 

.016 

. 254E-01 

. 276E-01 

. 425E-01 

- . 939E-01 

- . 986E-01 

- . 129E+00 

-20.238 

-19.799 

-17.363 

-74.87 

-74.38 

-71.72 

105.13 

105.62 

108.28 

1.000 

1.160 

.992 

.989 

.125 

.145 

- .  138E+01 

- . 113E+01 

. 768E+00 

. 933E+00 

3.961 

3.316 

-209.30 

-219.55 

-29.30 

-39.55 

25.00 

-1.000 

.000 

.712E-02 

.357E-16 

-43.955 

-360.00 

-180.00 

I _ I 

The  output  from  the  last  part  of  Step  18  for  the  closed  loop  transfer  function  is: 


THE  NUMERATOR  ROOTS  OF  WR00T74  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-1.1565382 

-1.6333429 

2.0013470 

0.57787992 

2 

-1.1565382 

1.6333429 

2.0013470 

0.57787992 

3 

-0.49979000E-01 

0.00000000 

4 

-0.14897670 

0 . 00000000 

5 

-0.19997600 

0.00000000 

6 

-0.63513034 

0.00000000 

7 

1.0000000 

0.00000000 

8 

1.4202622 

0.00000000 

9 

-0 . 14998872E-01 

0.00000000 

10 

-1.1293899 

0.00000000 

11 

-3.7886695 

0.00000000 

LOW 

ORDER  NON-ZERO 

COEFFICIENT  =  -0 .40544268E+09 

THE 

DENOMINATOR 

ROOTS  OF  WR00T74  ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-0 . 86445207E-02  - 

■0 . 19740489E- 

•01 

0 . 21550282E-01 

0.40113260 

2 

-0.86445207E-02 

0 . 19740489E- 

■01 

0. 21550282E-01 

0.40113260 

3 

-0.65043354 

0.49797145 

0.81916992 

0.79401541 
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4 

5 

6 

7 

8 
9 

10 

11 


-0.65043354 
-0 . 50483130E-01 
-0 . 50483130E-01 
-1.1590403 
-1.1590403 
-0.14984642 
-0.80745084 
-0. 24997135E-01 


-0.49797145 

-0.27183963 

0.27183963 

1.6321899 

-1.6321899 

0.00000000 

0.00000000 

0.00000000 


0.81916992 

0.27648749 

0.27648749 

2.0018537 

2.0018537 


0.79401641 

0.18258739 

0.18258739 

0.57898351 

0.57898351 


LOW  ORDER  NON-ZERO  COEFFICIENT  =  -0.45483391E+09 


DEGREE  OF  NUMERATOR  OF  WPTF74  IS  11  (COEFFICIENTS  IN  ASCENDING  ORDER) 
-405442675.4115,  -40540373759.87,  -1029399615415.,  -9014932725520., 

-0 . 2905634043931E+14 ,  -0 . 1908394131918E+14,  0 . 3478524652666E+14 , 

0 . 3917269164053E+14,  2824065789320.,  -0. 1050080073S41E+14, 

-6881340070388.,  -1174303232932. 

DEGREE  OF  DENOMINATOR  OF  WPTF74  IS  11  (COEFFICIENTS  IN  ASCENDING  ORDER) 
-454833912.825,  -40472005447.76,  -2095819469977.,  -0.607804702868E+14, 

-5 . 6429960690542E+14 ,  -2 . 6543265628406E+15 ,  -9 . 5669949674168E+15 , 

-2 . 0671074218988E+16 ,  -2 . 6092151074662E+16 ,  - 1 . 8928238090245E+16 , 

-7 . 4340648839385E+15 ,  -1 . 5751814997412E+15 


************************************************************ 

*  ZR00T74  =  BILINEAR  TRANSFORM  OF  VR00T74  * 

*  ZPTF74  =  BILINEAR  TRANSFORM  OF  WPTF74  * 

************************************************************ 


THE  NUMERATOR  ROOTS  OF  ZR00T74  ARE 


NO. 

REAL 

IMAG. 

OMEGA 

ZETA 

1 

-0.41065841 

- 

■0.44636208 

0.60653066 

0.67706126 

2 

-0.41065841 

0.44636208 

0.60653066 

0.67706126 

3 

0.90480000 

0.00000000 

4 

0.74067933 

0.00000000 

5 

0.66670000 

0.00000000 

6 

0.22314408 

0.00000000 

7 

-5.7589334 

0.00000000 

8 

0.97044554 

0.00000000 

9 

-0 . 60763832E- 

■01 

0.00000000 

10 

-0.58234746 

0.00000000 

LOW 

ORDER  NON-ZERO 

COEFFICIENT  = 

0.64182675E+12 

THE 

DENOMINATOR  ROOTS  OF  ZR00T74 

ARE 

NO. 

REAL 

IMAG. 

OMEGA 

ZETA 
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1 

0.98209992 

-0 . 38792282E-01 

0.98286575 

-0.99922081 

2 

0.98209992 

0 . 38792282E-01 

0.98286575 

-0.99922081 

3 

0.11069011 

0.33511920 

0.35292659 

-0.31363493 

4 

0.11069011 

-0.33511920 

0.35292659 

-0.31363493 

5 

0.78439407 

-0.46175803 

0.91021675 

-0.86176624 

6 

0.78439407 

0.46175803 

0.91021675 

-0.86176624 

7 

•0.41054109 

0.44561878 

0.60590435 

0.67756749 

8 

-0.41054109 

-0.44561878 

0.60590435 

0.67756749 

9 

0.73936272 

0.00000000 

10 

0.10653079 

0.00000000 

11 

0.95122497 

0.00000000 

LOW  ORDER  NON-ZERO 

COEFFICIENT  = 

0. 

,  1200172SE+15 

DEGREE 

OF  NUMERATOR 

OF  ZPTF74  IS  10 

(COEFFICIENTS 

IN 

ASCENDING  ORDER) 

641826746728.,  7132904594001.,  -0 . 5657545358892E+14,  9726111302955., 

2 . 0124699748364E+14,  0 . 6510785645237E+14,  -4.4814841451781E+14, 

-3.5446394168299E+14,  9 . 923564104109E+14,  -3 . 2895377257116E+14 , 

-0 . 8848569792934E+14 

DEGREE  OF  DENOMINATOR  OF  ZPTF74  IS  11  (COEFFICIENTS  IN  ASCENDING  ORDER) 
1 . 200172534403E+14,  -1 . 8312664437S7E+16,  9. 113889688568E+15, 

-2.905814310215E+16,  6 . 010675784938E+16,  -8 . 087S336872616E+16 , 

1 . 1557351641473E+17,  -2 . 4731700097239E+17 ,  4. 1453048760663E+17, 

-4. 0364178929084E+17,  2 . 0704802617974E+17 ,  -4.3769624060665E+16 


This  closed  loop  transfer  function  is  almost  identical  to  the  one  computed  in  Example  20  (ZPTF2o) 
using  the  Kalman-Bertram  method.  The  underscored  digits  above  represents  the  difference  between 
these  two  examples.  The  coefficients  are  not  the  same  since  they  are  normalized  differently. 

It  then  follows  that  the  time  response  computed  in  Step  18  will  be  very  close  to  the  results  of 
Example  20.  The  output  at  every  0.5  seconds,  with  the  differences  between  these  two  examples 
underscored,  is  given  below. 


Time 

c(t) 

.00000 

.00000 

.50000 

.85386 

1.0000 

1.2904 

1.5000 

1.2068 

2.0000 

.95341 

2.5000 

.80422 

3.0000 

.80327 

3.5000 

.86519 

4.0000 

.90982 

final  value 

.89141 

While  the  differences  between  the  open  and  closed  loop  results  with  Example  20  are  too  small  to 
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be  noticed  in  a  plot,  the  poles  and  zeros  of  both  the  open  and  closed  loop  transfer  functions  are 
sufficiently  different  to  warrant  a  discussion.  Relative  to  Example  201,  note  that  the  open  loop 
poles  are  more  accurate  than  the  open  loop  zeros  while  the  opposite  it  true  with  the  closed  loop 
poles  and  zeros.  This  will  be  explained  below. 

The  single  largest  contributor  to  the  difference  between  the  results  of  Examples  20  and  21  is  most 
likely  the  accuracy  in  computing  the  numerator  roots  of  the  fast-to-slow  rate  transform  from  T/40 
to  T/4  in  Step  8.  This  operation  transforms  WPTF40,  which  is  a  49th/50th  order  transfer  function 
with  38  poles  at  w=-1.0,  into  WPTF41,  which  is  a  lOth/llth  order  transfer  function.  As  discussed 
in  Section  C.6,  the  accuracy  in  computing  the  numerator  roots  of  a  fast-to-slow  rate  transform  can 
be  questionable  if  the  order  of  the  transfer  function  (WPTF40  in  this  case)  is  large,  which  this 
example  certainly  is.  To  check  the  accuracy  of  this  transform,  command  WMRFQ2,  was  used  in 
a  separate  job  to  compute  the  multirate  frequency  response  of  WPTF40  for  comparison  with  the 
frequency  response  of  WPTF41.  Results  of  this  comparison  show  that  at  low  frequencies  the  gain 
(in  dB)  and  phase  agree  to  at  least  3  or  4  significant  digits  but  drop  off  to  2  or  3  significant  digits 
at  higher  frequencies.  Since  this  is  in  the  range  of  the  differences  found  between  the  open  loop 
frequency  responses  of  Examples  20  and  21,  it  supports  the  contention  that  these  differences  are 
most  likely  attributable  to  the  the  accuracy  with  which  the  numerator  roots  of  WPTF41  can  be 
calculated. 

In  computing  the  open  loop  transfer  function  using  block  diagram  reduction,  errors  associated  with 
this  method  of  analysis  can  be  significant  if  the  order  of  the  transfer  functions  are  too  high  and 
if  there  are  too  many  operations.  In  this  example  the  order  of  the  transfer  functions  are  not  high 
after  transforming  down  to  the  slowest  sampling  rate,  but  the  number  of  operations  are  certainly 
high  enough  that  some  degradation  in  accuracy  can  be  expected.  In  this  example  the  poles  are 
accurate  to  at  least  5  significant  digits  but  some  of  the  zeros  are  only  accurate  to  2  or  3  significant 
digits.  As  explained  in  the  preceeding  paragraph,  the  accuracy  in  these  zeroes  were  not  the  result 
of  block  diagram  algebra,  but  the  results  of  computing  a  fast-to-slow  rate  transform  for  a  high  01  cW 
transfer  function. 

In  computing  the  closed  loop  transfer  function  using  block  diagram  reduction,  the  accuracy  of 
the  resultant  closed  loop  poles  will  have  accuracies  no  better  that  the  open  loop  zeros  since  the 
denominator  is  1  plus  the  open  loop  transfer  function.  This  is  certainly  the  case  since  the  some 
of  the  poles  of  ZPTF74  are  accurate  only  to  2  or  3  significant  digits.  The  closed  loop  zeros  of 
ZPTF74,  however,  are  accurate  to  at  least  7  digits.  The  reason  why  the  zeros  are  several  orders 
of  magnitude  more  accurate  than  the  poles  is  dues  to  the  method  of  computing  the  zeros.  Unlike 
the  poles  which  are  the  end  results  of  many  block  diagram  operations,  nearly  all  of  the  zeros  of  the 
closed  loop  transfer  function  are  computed  directly  from  a  single  transform  operation3  in  Step  17. 
The  order  of  this  transform  is  not  very  high  so  that  the  accuracy  of  7  or  8  significant  digits  can  be 
expected. 

As  can  be  seen,  the  classical  transform  method  is  much  more  complex  to  use  than  the  automated 
analysis  method  of  Example  20  for  the  analysis  of  this  benchmark  problem.  It  is  also  not  as  accurate 
because  of  the  fast-to-slow  rate  transform  of  a  high  order  transfer  function.  If  the  ratios  of  the 

lAn  assumption  is  made  that  the  results  obtained  with  the  Kalman-Bertram  method  are  more  accurate  than  the 
lassical  transform  method. 

7  It  numerically  evaluates  the  frequency  response  of  a  fast-to-slow  rate  transform  by  direct  evaluation  using  fre¬ 
quency  decomposition.  See  Section  C.6  on  how  this  command  can  be  used  to  check  the  accuracy  of  command 
WMRXFM. 

3W  transform  from  eta  to  the  output  of  c  at  the  slowest  sampling  period 
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sampling  rates  were  not  as  high,  the  accuracy  of  t 
the  Kalman-Bertram  method. 


A  ppendix  A 


Reference  for  LCAP2  Commands 


This  Appendix  provides  alphabetical  references  of  all  batch  LCAP2  commands. 

A  summary  of  the  notations  used  for  various  data  types1  in  LCAP2  is  given  in  Table  A.l 


Table  A.l:  Summary  of  Notations  Used 


notation 

description 

SPTF; 

S  plane  transfer  functions,  i  =  0,99S 

ZPTF; 

Z  plane  transfer  functions,  i=0,999 

WPTFj 

W  plane  transfer  functions,  i=0,999 

POLYi 

Polynomials,  i— 0,999 

Ci 

S  plane  transfer  function  connection  block  for  modeling  either 
continuous  or  continuous-discrete  system 
i=l,MDIMYC  for  modeling  a  continuous  system 
i=l,NDIMYC  for  modeling  a  continuous-discrete  system 

D; 

.  . 

Z  plane  transfer  function  connection  block  for  modeling  a 
continuous-discrete  system.  i=l,NDIMYD 

Si 

Sample-hold  connection  block  for  modeling  a  continuous-discrete 
system.  i=l, NDIMXS 

MDIMYC=30,  NDIMYC=NDIMYD=20,  and  NDIMXS  =5  for  normal  version 
of  LCAP2  on  the  CRAY  and  CDC. 


MDIMYC  =  75,  NDIMY C =NDIM YD = 50,  and  NDIMXS=10  for  large  version 
of  LCAP2  on  the  CRAY2. 


A  summary  of  the  LCAP2  commands  by  subject  is  given  in  the  following  tables. 


‘They  are  defined  in  Chapters  6  and  7. 
3 ACCESSed  with  ID=MI100. 


A  -  1 


Table  A. 2:  Transfer  Function  Algebra  Commands 


PADD 

Polynomial  add 

PEQU 

Polynomial  equal 

PSUB 

Polynomial  subtract 

PMPY 

Polynomial  multiply 

PLDC 

Polynomial  load,  coefficient  form 

PLDR 

Polynomial  load,  root  form 

POLY 

Print  out  polynomial 

PDEL 

Delete  polynomial 

SPADD 

S  plane  transfer  function  add 

* 

SPEQU 

S  plane  equal 

* 

SPSUB 

S  plane  transfer  function  subtract 

* 

SPMPY 

S  plane  transfer  function  multiply 

* 

SPDIV 

S  plane  transfer  function  divide 

* 

SPCLSLP 

S  plane  closed  loop  transfer  function 

* 

SELCR 

Eliminate  common  roots  of  an  s  plane  transfer  function 

* 

SNORM 

S  plane  transfer  function  normalization 

* 

SPLDC 

S  plane  load,  coefficient  form 

* 

SPLDR 

S  plane  load,  root  form 

* 

SPTF 

Print  out  s  plane  transfer  function 

* 

SPDEL 

Delete  s  plane  transfer  function 

* 

CPYPS 

Copy  2  polynomials  into  an  s  plane  transfer  function 

* 

CPYSP 

Copy  s  plane  transfer  function  into  2  polynomials 

* 

*  -  Corresponding  z  and  w  commands  are  available  by  substituting  Z  or  W 


for  the  letter  S. 


Table  A. 3:  Frequency  Response  Commands 


SFREQ 

Frequency  response  of  SPTF; 

ZFREQ 

Frequency  response  of  ZPTF; 

WFREQ 

Frequency  response  of  WPTFj 

BlFREQ 

SISO  frequency  response  of  a  continuous  system  modeled  by  a  connection 
of  s  plane  transfer  functions 

B2FREQ 

SISO  frequency  response  of  a  continuous-discrete  system  modeled  by  a 
connection  of  s  and  z  plane  transfer  functions  and  sample-hold  blocks 

FREQS 

Frequency  response  of  a  user  supplied  s  plane  function 

FREQZ 

Frequency  response  of  a  user  supplied  z  plane  function 

FREQW 

Frequency  response  of  a  user  supplied  w  plane  function 

ZMRFQ 

Frequency  response  of  a  fast-to-slow  multirate  z  transform 

I  WMRFQ 

Frequency  response  of  a  fast-to-slow  multirate  w  transform 
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Table  A. 4:  Time  Response  Commands 


STIME 

Time  response  of  SPTF; 

ZTIME 

Time  response  of  ZPTF; 

BlTIME 

SISO  time  response  of  a  continuous  system  modeled  by  a  connection 
of  s  plane  transfer  functions 

B2TIME 

SISO  time  response  of  a  continuous-discrete  multirate  system  mod¬ 
eled  by  a  connection  of  s  and  z  plane  transfer  functions  and  sample- 
hold  blocks 

Table  A. 5:  Root  Finding  Commands 


PRTS 

SPRTS 

ZPRTS 

WPRTS 

Find  roots  of  POLY; 

Find  roots  of  SPTF; 

Find  roots  of  ZPTF; 

Find  roots  of  WPTF; 

Table  A. 6:  Root  Locus  Commands 

SLOCI 

ZLOCI 

WLOCI 

Root  locus  of  SPTF; 

Root  locus  of  ZPTFi 

Root  locus  of  WPTF; 

Table  A. 7:  Transfer  Function  Transform  Commands 


SZXFM 

S  to  z  plane  transform  (classical  z  transform) 

SWXFM 

S  to  w  plane  transform  (classical  w  transform) 

ZWXFM 

Z  to  w  plane  bilinear  transform 

WZXFM 

W  to  z  plane  bilinear  transform 

ZSXFM 

Z  to  “equivalent”  s  plane  root  transform 

WSXFM 

W  to  “equivalent”  s  plane  root  transform 

SZMRX 

S  to  z  plane  slow-fast  multirate  transform  (ZOH  at  a  slower  rate) 

SWMRX 

S  to  w  plane  slow-fast  multirate  transform  (ZOH  at  a  slower  rate) 

ZMRXFM 

Z  plane  fast-slow  multirate  transform  in  rational  form 

WMRXFM 

W  plane  fast-slow  multirate  transform  in  rational  form 

Table  A. 8:  Commands  for  Determinant  of  a  Polynomial  Matrix 


DTERM 

Determinant  of  Mj(s) 

DETRM 

.  . 

Determinant  of  M(s)  (old  version) 

Table  A. 9:  Commands  for  Automated  Analysis  of  Continuous  Systems 


B1INIT 

Initialization  for  connection  of  C;  blocks 

B1CEQ 

Equation  definition  for  C;  connection  block 

BlEND 

Termination  for  connection  of  C;  blocks 

B1E1G 

Compute  eigenvalues  of  a  continuous  system  modeled  as  a 
connection  of  s  plane  transfer  functions 

B1TF 

i 

Compute  transfer  function  of  a  continuous  system  modeled 
as  a  connection  of  s  plane  transfer  functions 

B1LOCI 

Compute  root  locus  of  a  continuous  system  modeled  as  a 
connection  of  s  plane  transfer  functions 

B1FREQ 

SISO  frequency  response  of  a  continuous  system  modeled  by 
a  connection  of  s  plane  transfer  functions 

BITIME 

SISO  time  response  of  a  continuous  system  modeled  by  a 
connection  of  s  plane  transfer  functions 

Table  A.  10:  Commands  for  Automated  Analysis  of  Continuous-Discrete  Multirate  Systems 


B2INIT 

Initialization  for  connection  of  C;,  Dj,  S;  blocks 

B2CEQ 

Equation  definition  for  C;  connection  block 

B2DEQ 

Equation  definition  for  Si  connection  block 

B2SEQ 

Equation  definition  for  S;  connection  block 

B2END 

Termination  for  connection  of  Cj,  D;,  S;  blocks 

B2EIG 

Compute  eigenvalues  of  a  continuous-discrete  multirate  system  modeled 
as  a  connection  of  s  and  z  plane  transfer  functions  and  sample-hold  blocks 

B2TF 

Compute  transfer  function  of  a  continuous-discrete  multirate  system  mod¬ 
eled  as  a  connection  of  s  and  z  plane  transfer  functions  and  sample-hold 
blocks 

B2LOCI 

Compute  root  locus  of  a  continuous- discrete  multirate  system  modeled  as 
a  connection  of  s  and  z  plane  transfer  functions  and  sample-hold  blocks 

B2FREQ 

SISO  frequency  response  of  a  continuous-discrete  multirate  system  mod¬ 
eled  by  a  connection  of  s  and  z  plane  transfer  functions  and  sample- hold 
blocks 

B2TIME 

SISO  time  response  of  a  continuous-discrete  multirate  system  modeled  by 

a  connection  of  s  and  z  plane  transfer  functions  and  sample-hold  blocks 
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Table  A.  11:  Restart  Commands 


SAVE 

Save  all  SPTF;,  ZPTF;,WPTFj,  POLYs  data,  all  MO,  Ml,  M2,  M3, 

M4  matrices,  and  all  BO,  Bl,  B2,  B3,  B4  vectors  currently  in  use 

LOAD 

Load  data  saved  by  the  SAVE  command 

BlSAVE 

Save  transfer  function  connection  data  for  a  continuous  system 

B2SAVE 

Save  transfer  function  connection  data  for  a  continuous-discrete  multirate 

system 

BlLOAD 

Reload  data  saved  by  the  BlSAVE  command 

B2LOAD 

Reload  data  saved  by  the  B2SAVE  command 

BlCEQ 


B1CEQ 

PURPOSE:  Equation  definition  for  a  C;  continuous  block  used  for  automated  modeling  of  a 
continuous  system  by  connection  of  transfer  function  blocks 

Subroutine  BlCEQ  is  part  of  a  set  of  subroutines  used  for  defining  the  connection  of  s  plane  trans¬ 
fer  functions  for  automated  transfer  function  analysis  of  a  continuous  system.  This  subroutine  is 
to  be  called  for  each  C;  block  defined.  Before  calling  this  subroutine,  the  initialization  routine 
BlINIT  must  first  be  called.  After  the  last  C;  block  is  defined  by  a  call  to  subroutine  BlCEQ,  the 
subroutine  BlEND  must  be  called  to  complete  the  connection  procedure. 


FORTRAN  CALL 


CALL  B1CEQ(  label,  indx,  isptf,  iyin,  nycin,  iycin  ) 


where,  label  = 
indx  = 
isptf  = 
iyin  = 
nycin  — 
iycin  = 


label  for  block  C;  (.LE.60  characters) 
block  identifier  for  block  C;  (.LE.MDIMYC) 

SPTF  identifier  for  block  C;  (0-999) 
for  future  use.  Enter  a  dummy  value. 

number  of  continuous  blocks  connected  as  inputs  to  block  Cj 
array  containing  the  identifiers  of  the  continuous  blocks  connected 
to  C;.  (negative  value  of  sign  change) 


The  dummy  array  iycin  can  be  any  integer  array  dimensioned  at  least  nycin  which  the  user  can 
declare.  For  convenience,  though,  an  array  IYCIN  in  common  block  IYCDS  can  be  used  instead. 
This  array  is  described  in  the  following  table. 


COMMON/IYCDS/  parameters  used 

parameter 

preset 

description 

IYCIN 

0 

Array  containing  the  identifiers  of  the  continuous  blocks  connected 
to  Cj 

IYCIN(l)  =  id  number  of  1st  continuous  block  connected  to  Cj 
IYCIN(2)  =  id  number  of  2nd  continuous  block  connected  to  Ci 

lYCIN(nycin)  =  id  number  of  nycin-th  continuous  block  connected 

to  C; 

Example  1:  Block  C3  is  to  be  represented  by  s  plane  transfer  SPTF4.  The  are  two  continuous 

blocks,  Ci  and  C5  connected  to  the  input  of  block  C3.  Block  C3  is  to  be  labeled 
as  ’rate  gyro  filter’.  The  FORTR  AN  code  to  define  block  C3  can  be  written  as: 

INDX=3 

ISPTF=4 

NYCIN=2 

IYCIN(1)=1 

IYCIN(2)=S 

CALL  BlCEQ ( ’RATE  GYRO  FILTER' .INDX .ISPTF, 0, NYCIN, IYCIN) 


PRECMP  DIRECTIVE 


*BlCEQ  label  indx  isptf  iyin  nycin 


produces  the  following  FORTRAN  statements 


CALL  B1CEQ  ( 

+ ’ label 1 

+ , indx , isptf , iyin, nycin, IYCIH) 

Note  that  IYCIN  is  not  an  argument  in  the  *B1CEQ  directive. 


Example  2:  Using  Example  1  from  above,  the  following  code  fragment 

*IYCIH  1  5 

♦B1CEQ  ’rate  gyro  filter’  3420 

produces  the  following  FORTRAN  statements 

IYCIH(1)=1 
IYCIH(2)=5 
CALL  B1CEQ( 

+ ’ RATE  GYRO  FILTER’ 

+,3,4, 2,0 .IYCIH) 

METHOD  See  Chapter  7. 

COMMENTS  See  Example  17  in  Chapter  9. 
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BlEIG 


BlEIG 


PURPOSE:  Compute  eigenvalues  of  a  continuous  system  modeled  as  a  connection  of  s  plane 
transfer  functions 

POLY;  =  eigenvalues  of  system  matrix,  equivalent  to  det  [si  -  A] 


The  eigenvalues  of  continuous  system  modeled  as  a  connection1  of  s  plane  transfer  functions  are 
computed.  The  printout  of  the  state  space  matrices  computed  by  this  command  is  specified  by  the 
parameter  PRNMTRX  in  common  block  DBASE  described  by  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

PRNMTRX 

0 

.EQ.O  No  printout  of  state  space  matrices 
.EQ.l  Printout  of  computed  state  space  matrices 
.EQ.2  Above  plus  intermediate  matrices 

FORTRAN  CALL  CALL  BlEIG(  i  ) 


where,  i  =  index  for  storing  polynomial  POLY; 

Example  1:  Compute  the  eigenvalues  of  a  continuous  system  modeled  as  a  connection  of  s 

plane  transfer  functions  and  store  into  POLY2.  The  FORTRAN  code  can  be 
written  as: 

CALL  B1EIGC2) 


PRECMP  DIRECTIVE  *BlEIG  i 


produces  the  following  FORTRAN  statement 
CALL  BlEIG(i) 


Example  2: 

*B1EIG  2 


produces  the  following  FORTRAN  statement 
CALL  B1EIG(2) 

METHOD  See  Chapter  7  and  Section  C.2. 


‘With  calls  to  subroutines  B1INIT,  BlCEQ,  and  BIEND. 


A  -  8 


BlEND 


BlEND 


PURPOSE:  Complete  the  transfer  function  connection  procedure  initiated  by  calls  to  subroutines 
BlINIT  and  BlCEQ  for  automated  modeling  of  a  continuous  system 


Subroutine  BlEND  is  the  last  of  a  set  of  subroutines  used  for  modeling  the  connection  of  a  set  of  s 
plane  transfer  functions  for  automated  transfer  function  analysis  of  a  continuous  system.  It  checks 
to  make  sure  that  all  the  C;  blocks  have  been  properly  specified.  The  connection  of  the  C;  blocks 
specified  by  the  calls  to  subroutine  BlCEQ  is  printed  out. 


FORTRAN  CALL 


CALL  BlEND(  ) 


PRECMP  DIRECTIVE 


♦BlEND 


produces  the  following  FORTRAN  statement 
CALL  B1EHDC  ) 

COMMENTS  If  a  C;  block  has  not  been  properly  specified  the  program  will  abort. 
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BlFREQ 


B1FREQ 


PURPOSE:  Compute  SISO  frequency  response  between  blocks  Cj  and  Cj  of  a  continuous 
system  modeled  as  a  connection  of  s  plane  transfer  functions 


A  SISO  frequency  response  of  an  s  plane  transfer  function  is  computed  for  a  continuous  system 
modeled  as  a  connection1  of  s  plane  transfer  functions.  The  continuous  connection  block  C;  which 
the  input  is  connected  to  is  specified  by  parameter  UCIN.  The  magnitude  of  the  input  is  specified 
by  the  parameter  UMAGN.  The  continuous  connection  block  Cj  which  defines  the  output  is  spec¬ 
ified  by  parameter  YCOUT.  Parameter  PRNMTRX  is  used  to  specify  the  type  of  output  for  the 
state  space  matrices  computed  by  this  command.  These  parameters  are  in  common  block  DBASE 
described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

UCIN 

0 

C;  block  number  where  input  u  is  connected  to 

UMAGN 

1. 

Magnitude  of  the  input  u 

YCOUT 

0 

Ci  block  number  defining  the  output 

.EQ.O  No  printout  of  state  space  matrices 
.EQ.l  Printout  of  computed  state  space  matrices 
.EQ.2  Above  plus  intermediate  matrices 

This  command  differs  from  command  SFREQ  which  computes  the  frequency  response  of  an  s 
plane  transfer  function  SPTF;  represented  in  rational  function.  Command  BlFREQ  computes  the 
frequency  response  of  a  transfer  function  directly  from  a  state  space  representation  of  a  system 
modeled  by  a  connection  of  SPTF;  transfer  functions.  It  uses  Laub’s  method  which  does  not 
involve  the  computation  of  the  poles  and  zeros  of  the  transfer  function. 

Command  BlFREQ  is  an  alternate  method  for  computing  the  frequency  response  of  a  system 
modeled  as  a  connection  of  SPTF;  transfer  functions.  The  combination  of  commands  BlTF  and 
SFREQ  will  yield  the  poles  and  zeros  as  well  as  the  frequency  response  of  a  transfer  function.  As 
discussed  in  Section  7.2,  computation  of  the  poles  and  zeros  is  a  difficult  numerical  problem  to  solve 
in  a  reliable  and  accurate  manner.  If  the  accuracy  of  the  poles  or  zeros  from  a  BlTF  command  are 
in  question,  command  BlFREQ  can  be  used  to  check  the  frequency  response  of  a  transfer  function 
computed  by  the  combination  of  commands  BlTF  and  SFREQ. 

Two  modes  are  available  for  selecting  the  frequency  points  used  for  evaluating  the  frequency  re¬ 
sponse  of  the  transfer  function.  The  automatic  mode,  selected  when  FAUTO  is  nonzero,  allows  the 
user  to  specify  up  to  20  preselected  frequencies  with  the  array  OMEGA.  In  this  mode  the  program 
will  use  all  these  preselected  points  plus  its  own  dynamically  generated  points  to  yield  a  smooth 
plot.  The  number  of  preselected  points  is  determined  by  NOMEGA.  The  beginning  and  last  fre¬ 
quency  points  for  computing  the  response  are  determined  by  OMEGA(l)  and  OMEGA(NOMEGA), 
respectively. 

'With  calls  to  subroutines  BlINIT,  BlCEQ,  and  BlEND. 
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In  the  nonautomatic  frequency  mode  (FAUTO=0)  the  user  can  define  up  to  five  sets  of  frequencies 
to  be  used  in  computing  the  response.  Each  of  these  sets  is  specified  by  a  three  element  array 
of  the  form  FREQk(i),  i=l,3.  If  FREQk(l)=a,  FREQk(2)=b  and  FREQk(3)=c,  the  k-th  set  of 
frequencies  specified  is: 

a,  a+c,  a-f  2c,  ...  a+jc,  b 

where  j  is  the  largest  integer  such  that  (a+jc)  is  less  than  b.  Each  successive  FREQk  array  must 
define  an  increasing  set  of  frequencies  such  that  the  first  value  of  the  segment  is  always  larger  than 
the  last  value  of  the  preceding  segment.  When  FREQk(3)  is  not  larger  than  FREQk(l),  as  in  the 
case  with  the  preset  values  for  k  =  2,  5  ,  those  segments  will  not  be  used. 

With  either  the  automatic  or  the  nonautomatic  frequency  mode,  the  program  will  automatically 
check  for  the  gain  and  phase  crossover.  When  found,  the  program  will  iterate  until  the  exact  cross 
over  frequency  is  found.  The  limit  on  the  number  of  plot  points  computed  is  1500. 

The  units  used  for  representing  transfer  functions  are  in  rad/sec.  For  frequency  response  calcula¬ 
tions,  the  frequencies  used  for  evaluating  the  response  can  either  be  in  rad/sec  or  Hz.  A  nonzero 
value  for  the  parameter  RAD  will  select  the  units  rad/sec,  while  a  zero  value  will  select  Hz. 

Bode,  Nichols,  and  Nyquist  plots  are  selected  by  the  values  of  the  flags  FBODE,  FNICO,  FNYQS, 
respectively.  See  the  table  in  the  Reference  for  command  SFREQ  for  the  definition  and  default 
values  of  parameters  used  by  command  BlFREQ. 


FORTRAN  CALL 


CALL  BlFREQ(  ) 


Example  Is  Assume  that  a  system  has  been  modeled  as  a  connection  of  SPTF;  transfer 
functions  with  calls  to  subroutines  BlINIT,  BlCEQ,  and  BIEND.  Compute  the 
frequency  response  of  the  transfer  function  from  block  C13  to  block  C2  using 
the  auto  frequency  mode  for  frequencies  between  1.  and  100.  and  at  10.  Select 
printer  and  hardcopy  Bode  plots  with  auto  scaling.  The  FORTRAN  code  can  be 
written  as: 


UCIN=13 

YC0UT=2 

UMAGH=1 . 

FAUTQ=1 

N0MEGA=3 

OWES A (1?  1. 

0MEGA(2)=10. 

OMEGA(3)=100. 

FB0DE=1 

GRAFP=1 

HRDCPY=1 

CALL  B1FREQ(  ) 


PRECMP  DIRECTIVE 


♦BlFREQ  | 
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produces  the  following  FORTRAN  statement 


CALL  B1FREQC  ) 


Example  2:  Using  Example  1  from  above,  the  following  code  fragment 


UC 11=13 
YC0UT=2 
UHAGH=1. 
FAUT0=1 
N0MEGA=3 
♦OMEGA  1  10  100 
FB0DE=1 
GRAFP=1 
HRDCPY=1 
♦B1FREQ 


produces  the  following  FORTRAN  statements 


UCIH=13 

YC0UT=2 

UMAGH=1 . 

FAUT0=1 

B0MEGA=3 

0MEGA(1)=10. 

0MEGA(2)=10 . 

OMEGA(3)=100 . 

FB0DE=1 

GRAFP=1 

HRDCPY=1 

CALL  BIFREQC  ) 


METHOD  Section  7.2  describes  how  a  state  space  representation  is  computed  for  a  system 
modeled  by  a  connection  of  SPTF;  transfer  functions.  See  the  Reference  for  command  SFREQ  on 
how  the  frequency  points  are  automatically  selected  if  the  parameter  FAUTO  is  nonzero. 

If  a  frequency  point  being  used  to  evaluate  the  response  is  equal  to  a  pole  on  the  ju>  axis,  the 
warning  message 

(S*I  -  A)  IS  SINGULAR  TO  WORKING  PRECISION  AT  OMEGA  =  . . . ,  THIS  POINT  SKIPPED 
will  be  printed  out  and  the  program  allowed  to  continue. 
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B1INIT 


BlINIT 


PURPOSE:  Initialization  routine  for  automated  modeling  of  a  continuous  system 


Subroutine  BlINIT  is  the  first  of  a  set  of  subroutines  used  for  modeling  the  connection  of  s  plane 
transfer  function  blocks  for  automated  transfer  function  analysis  of  a  continuous  system.  This 
initialization  is  used  primarily  to  let  the  program  know  that  a  set  of  calls  to  subroutine  BlCEQ 
will  follow  which  will  specify  the  connection  of  each  Cj  block. 


FORTRAN  CALL 


CALL  BlINIT(  tlabel,  oldnew,  ncblk  ) 


where,  tlabel  =  label  for  block  1  connection  (.LE.60  characters) 
oldnew  =  ’OLD’  for  old  data,  (no  initialization) 

=  ’NEW’  for  new  data,  (initializes  all  connections) 
ncblk  =  number  of  s  plane  connection  blocks  (.LE.MDIMYC) 


Example  Is  A  continuous  system  with  7  s  plane  transfer  function  blocks  are  to  be  modeled  for 
automated  transfer  function  analysis.  The  model  is  to  be  labeled  as  ’PROJECT 
XYZ’.  The  FORTRAN  code  for  initializing  the  connection  of  this  model  can  be 
written  as: 


CALL  B1INITC ’PROJECT  XYZ* , 'NEW ' ,7) 


PRECMP  DIRECTIVE 


♦BlINIT  tlabel  oldnew  ncblk 


produces  the  following  FORTRAN  statements 
CALL  B1IHIT( 

+tlabel 

+ , oldnew .ncblk) 

Example  2:  Using  Example  1  from  above,  the  following  code  fragment 

♦BlINIT  'PROJECT  XYZ'  'NEW'  7 


produces  the  following  FORTRAN  statement 

CALL  BlINITC PROJECT  XYZ' 

+. 'NEW’, 7) 

COMMENTS  See  Chapter  7. 
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BILOAD 


BILOAD 


PURPOSE:  Load  a  file  of  block  diagram  connection  data  previously  saved  with  the  command 
BlSAVE 


FORTRAN  CALL 


CALL  BlLOAD(  filemame  ) 


where,  file  .name  =  local  file  name  (.LE.7  characters) 

(the  local  file  must  be  attached  before  execution  of  a  batch  job) 


Example  1:  Load  transfer  function  connection  data  for  modeling  a  continuous  system  from 

local  file  BlDATA.  The  required  FORTRAN  code  can  be  written  as: 

CALL  B1L0AD (’ BlDATA*) 


PRECMP  DIRECTIVE  *B1L0AD  file-name 


produces  the  following  FORTRAN  statement 


CALL  BlL0AD(f ile.name) 


Example  2:  +B1L0AD  'BlDATA' 


produces  the  following  FORTRAN  statement 
CALL  B1L0AD( ’BlDATA’) 

COMMENTS  See  the  Reference  for  command  BlSAVE  for  description  of  the  file. 
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BlLOCI  BILOCI 

PURPOSE:  Automated  root  loci  of  a  continuous  system  modeled  as  a  connection  of  s  plane 
transfer  functions 


Root  locus  is  automatically  computed  for  a  continuous  system  modeled  as  a  connection1  of  s  plane 
transfer  functions.  This  is  a  more  general  root  loci  command  than  SLOCI  which  computes  the  root 
locus  by  varying  the  loop  gain  of  a  SPTF;  transfer  function.  With  the  BlLOCI  command,  the 
root  locus  is  computed  by  varying  the  gain  of  any  C;  block.  The  gains  to  be  used  are  multipliers  of 
the  transfer  function  associated  with  the  C;  block  selected.  Thus,  the  gains  should  begin  at  a  value 
less  than  1.0  and  end  with  a  value  greater  than  1.0  if  the  loci  is  to  bracket  the  nominal  operating 
gain  of  the  system.  The  method  of  specifying  the  gains  to  be  used  in  computing  the  root  loci  is 
identical  to  that  used  by  command  SLOCI.  The  printout  of  the  state  space  matrices  computed  by 
this  command  is  specified  by  the  parameter  PRNMTRX  in  common  block  DBASE  described  by 
the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

PRNMTRX 

0 

.EQ.O  No  printout  of  state  space  matrices 
.EQ.l  Printout  of  computed  state  space  matrices 
.EQ.2  Above  plus  intermediate  matrices 

Up  to  25  preselected  gains  for  evaluating  the  root  loci  can  be  specified  with  array  KGAIN.  The 
number  of  preselected  gains  is  determined  by  NLOCI.  The  beginning  and  last  gains  are  determined 
by  KGAIN(l)  and  KGAIN(NLOCI),  respectively.  Additional  gains  can  be  automatically  computed 
by  the  program  to  fill  in  values  between  the  preselected  gains.  Between  KGAIN(i)  and  KGAIN(i  +  l), 
additional  gains  will  be  selected  by  either  of  the  following  two  methods  if  they  are  between  KGAIN(i) 
and  KGAIN(i+l). 

If  KFLG.EQ.O,  gain  =  KGAIN(i)  +  KDELT+j,  j=l,2,  ... 

If  KFLG.NE.O,  gain  =  KGAIN(i)*KDELT**j,  j=l,2,  ... 

For  example,  if  KGAIN(2)=10,  KGAIN(3)=100,  KFLG=1,  and  KDELT=2,  the  following  gains 
will  be  used  to  compute  the  root  loci: 

.  .  .  10.,  20.,  40.,  80.,  100.,  .  .  . 

The  total  number  of  gains  used  is  limited  by  the  value  of  the  parameter  ITLOC  which  is  preset  to 
50.  Parameters  used  by  BlLOCI  are  given  in  the  following  table. 


'Specified  with  calls  to  subroutines  B1INIT,  BlCEQ,  and  BlEND. 
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COMMON/DBASE/  parameters  used 

description 

NLOCI 

2 

Number  of  root  locus  gains  entered  in  array  KGAIN  (max-25) 

KG  AIN 

Array  of  root  locus  gains 

.5 

KGAIN(l)  =  first  user-specified  root  locus  gain 

2. 

KGAIN(2)  =  second  user-specified  root  locus  gain 
KGAIN(NLOCI)  =  last  user-specified  root  locus  gain. 

(Gains  computed  and  used  only  if  they  are  between  KGAIN(l) 
and  KGAIN(NLOCI)  ) 

KFLG 

1 

.EQ.O  to  increment  gain  by  multiplying  by  KDELT 
.NE.O  to  increment  gain  by  adding  by  KDELT 

KDELT 

1.E4 

Value  for  changing  gains  (preset  to  large  value  so  that  no  add¬ 
itional  gains  are  computed). 

ITLOC 

50 

Max.  number  of  different  gains  computed 

GRAFP 

1 

.NE.O  for  low  resolution  printer  plots 

HRDCPY 

0 

.NE.O  for  high  resolution  electrostatic  plots 

RLXMIN 

0. 

Min.  x  axis  for  plotting 

RLXMAX 

0. 

Max.  x  axis  for  plotting  (Auto,  scaling  of  x  axis 
if  RLXMIN =RLXM  AX) 

Min.  y  axis  for  plotting 

RLYMAX 

0. 

Max.  y  axis  for  plotting  (Auto,  scaling  of  y  axis 
if  RLYMIN= RLYMAX) 

RLFLGl 

1 

Flag  for  numbering  root  locus  points  on  hardcopy  plots 
.EQ.l  for  numbering;  .EQ.-l  for  no  numbering 

FORTRAN  CALL 


CALL  BlLOCI(  indx  ) 


where,  indx  =  block  identifier  of  Cjna*  block  where  gain  is  to  be  varied 
(.LE.  number  of  continuous  connection  blocks  specified  in 
call  to  BlINIT) 

Example  Is  Compute  the  the  root  locus  of  continuous  system  modeled  as  a  connection  of 
transfer  function  blocks  by  varying  the  gain  of  block  C4  from  2  to  20  by  doubling 
the  first  gain  until  the  last  gain  is  reached.  Select  printer  and  hardcopy  plots 
with  auto  scaling.  The  FORTRAN  code  can  be  written  as: 


IL0CI=2 

XGAIH(1)=2 

XGAIN(2)=20 

XFLG=0 

XDELT=2 . 

GRAFP=1 

HRDCPY=1 

CALL  B1L0CI(4) 
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PRECMP  DIRECTIVE  [^BlLOCI  indx 


produces  the  following  FORTRAN  statement 
CALL  BlLOCI(indx) 


Example  2: 

♦B1L0CI  4 


produces  the  following  FORTRAN  statement 


CALL  B1TF (4) 

METHOD  See  Chapter  7. 

COMMENTS  The  connection  of  the  transfer  function  blocks  must  represent  the  closed  loop 
configuration  of  the  system. 
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BIS  AYE 


BISAVE 


PURPOSE:  Save  the  transfer  function  connection  data  for  modeling  a  continuous  systems  to  a 
local  file 


This  subroutine  will  save  the  transfer  function  connection  data1  for  modeling  a  continuous  system. 
The  data  will  be  saved  to  a  local  file  which  the  user  can  reuse  in  the  same  job  by  reloading  it  with 
the  BlLOAD  command.  If  the  file  is  to  be  used  in  a  subsequent  batch  job  or  an  interactive  session, 
it  must  be  SAVEd  (CRAY)  or  CATALOGed  (CDC)  upon  exit  from  LCAP2. 


FORTRAN  CALL 


CALL  BlSAVE(  file_name  ) 


where,  file_name  —  local  file  name  (.LE.7  characters) 


Example  1:  Store  the  transfer  function  connection  data  for  modeling  a  continuous  system  in 

a  local  file  named  BlDATA.  The  FORTRAN  code  can  be  written  as: 


CALL  B1SAVEC ’BlDATA * ) 


PRECMP  DIRECTIVE 


*B1SAVE  file_name 


produces  the  following  FORTRAN  statement 
CALL  BlSAVE(lile_name) 

Example  2:  *B1SAVE  ’BlDATA’ 


produces  the  following  FORTRAN  statement 

CALL  B1SAVEC ’BlDATA’) 


METHOD  The  transfer  function  connection  data  of  a  continuous  system  is  converted  to  an  ASCII 
file  consisting  of  a  set  of  PRECMP  compatible  directives.  This  allows  the  file  to  be  easily  read 
and  modified,  if  necessary,  by  an  editor.  In  addition  to  being  read  by  command  BlLOAD,  this  file 
can  also  be  read  by  the  PRECMP  precompiler.  This  feature  can  be  utilized  in  conjunction  with 
interactive  LCAP2  to  simplify  the  effort  required  to  model  the  connection  of  transfer  functions  for 
a  batch  job. 

Instead  of  using  the  subroutines  BlINIT,  BlCEQ,  and  BlEND  to  specify  the  transfer  function 
connection  of  a  continuous  system  in  a  batch  job,  the  user  can  use  command  B 1CONN  in  interactive 
LCAP2  instead.  This  command  is  much  easier  to  use  since  it  is  prompt  driven  and  includes  logic 
to  test  for  reasonable  inputs.  After  verifying  that  the  model  is  correctly  specified,  the  command 
BISAVE  is  used  to  save  the  connection  data.  This  file  will  then  contain  the  necessary  PRECMP 

‘Specified  by  calls  to  subroutines  BlINIT,  BlCEQ,  and  BlEND. 
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T  i 


directives  which  can  be  used  as  code  for  a  batch  job.  Is  should  be  pointed  out  that  the  PRECMP 
directives  in  the  file  produced  by  the  BlSAVE  command  contains  only  numeric  values  whereas 
the  general  PRECMP  directives  allow  FORTRAN  expressions.  This  procedure  of  using  interactive 
LCAP2  to  develop  the  PRECMP  code  for  modeling  the  connection  of  transfer  functions  can  save 
the  user  significant  setup  time.  Once  this  code  is  incorporated  into  a  batch  job,  the  PRECMP  code 
can  be  changed  to  include  FORTRAN  variables  or  expressions  to  make  the  program  more  flexible. 
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BlTF 


B1TF 


PURPOSE:  Compute  SISO  transfer  function  between  blocks  C*  and  Cj  of  a  continuous 
system  modeled  as  a  connection  of  s  plane  transfer  functions 
SPTFj  =  SISO  transfer  function  evaluated 


A  SISO  transfer  function  is  automatically  evaluated  for  a  continuous  system  modeled1  as  a  con¬ 
nection  of  s  plane  transfer  functions.  The  continuous  connection  block  C,  which  the  input  is 
connected  to  is  specified  by  parameter  UCIN.  The  magnitude  of  the  input  is  specified  by  the  pa¬ 
rameter  UMAGN.  The  continuous  connection  block  Cj  which  defines  the  output  is  specified  by 
the  parameter  YCOUT.  Parameter  PRNMTRX  is  used  to  specify  the  type  of  output  for  the  state 
space  matrices  computed  by  this  command.  These  parameters  are  in  the  common  block  DBASE 
described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

UCIN 

0 

Cj  block  number  where  input  u  is  connected  to 

UMAGN 

1. 

Magnitude  of  the  input  u 

YCOUT 

0 

Cj  block  number  defining  the  output 

PRNMTRX 

0 

.EQ.O  No  printout  of  state  space  matrices 
.EQ.l  Printout  of  computed  state  space  matrices 
.EQ.2  Above  plus  intermediate  matrices 

FORTRAN  CALL 


CALL  BlTF(  i  ) 


where,  i  =  index  for  storing  evaluated  transfer  function  SPTF; 


Example  1:  Compute  the  transfer  function  from  C3  to  C6  for  a  unit  input.  Store  the  resulting 

transfer  function  in  SPTF2.  The  FORTRAN  code  can  be  written  as: 

UCIN=3 

YC0UT=6 

UMAGH=1. 

CALL  BlTF (2) 

PRECMP  DIRECTIVE  |  »B1TF  i 


produces  the  following  FORTRAN  statement 
CALL  BlTF(i) 


‘Specified  by  calls  to  subroutines  BUNT,  BlCEQ,  and  BlEND. 
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Example  2: 


*B1TF  2 


produces  the  following  FORTRAN  statement 
CALL  B1TFC2) 

METHOD  State  space  method  is  used  to  model  the  system.  The  QR  and  QZ  methods  are  used 
to  find,  respectively,  the  poles  and  zeros  of  the  transfer  function.  See  Chapter  7  and  Section  C.2. 
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BITIME 


BITIME 


PURPOSES  Compute  SISO  time  response  between  blocks  Cj  and  Cj  of  a  continuous  system 
modeled  as  a  connection  of  s  plane  transfer  functions  and  sample-hold  blocks 


An  SISO  time  response  is  automatically  evaluated  for  a  continuous  system  modeled  as  a  connection1 
of  s  plane  transfer  functions.  The  continuous  connection  block  C;  which  the  input  is  connected  to 
is  specified  by  parameter  UCIN.  The  type  of  input  and  its  magnitude  is  specified,  respectively,  by 
parameters  TTYPE  and  UMAGN.  The  continuous  connection  block  Cj  which  defines  the  output  is 
specified  by  parameter  YCOUT.  The  response  will  be  evaluated  every  TDELT  seconds  from  t=0  to 
t=TEND.  Parameter  PRNMTRX  is  used  to  specify  the  type  of  output  for  the  state  space  matrices 
computed  by  this  command.  Parameters  used  by  BITIME  are  in  common  block  DBASE  described 
in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

UCIN 

0 

C|  block  number  where  input  u  is  connected  to 

TTYPE 

1 

.EQ.O  for  impulse  response;  .EQ.l  for  step  response 

UMAGN 

1. 

Magnitude  of  input 

YCOUT 

0 

Ci  block  number  defining  the  output 

TDELT 

1. 

DePa  time  used  for  evaluating  continuous  time  response 

WMEMBM 

1. 

End  time  for  evaluating  time  response 

PRNMTRX 

0 

.EQ.O  No  printout  of  state  space  matrices 
.EQ.l  Printout  of  computed  state  space  matrices 
.EQ.2  More  printout  of  computed  state  space  matrices 

GRAFP 

1 

.NE.O  for  low  resolution  printer  plots 

HRDCPY 

0 

.NE.O  for  high  resolution  electrostatic  plots 

TXMIN 

Minimum  x  axis  for  time  plot 

TXMAX 

0. 

Maximum  x  axis  for  time  plot 

(Auto  scaling  of  x  axis  if  TXMIN=TXMAX) 

TYMIN 

0. 

Minimum  y  axis  for  time  plot 

TYMAX 

0. 

Maximum  y  axis  for  time  plot 

(Auto  scaling  of  y  axis  if  TYMIN=TYMAX) 

CONTP 

0 

=0  Single  curve  plot 
=  1  First  curve  of  a  plot 
=2  Continuation  of  a  plot 
=3  Final  curve  of  a  plot 

FORTRAN  CALL 


CALL  B1TIME(  ) 


'Specified  by  calls  to  subroutines  BlINIT,  BlCEQ,  and  BlEND. 
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Example  1:  Assume  that  a  system  has  been  modeled  as  a  connection  of  SPTF;  transfer 

functions  with  calls  to  subroutines  BlINIT,  BlCEQ,  and  BlEND.  Compute  the 
step  response  from  block  C3  to  block  C7  from  t=0  to  t=5  seconds  in  increments 
of  .2  seconds.  Select  only  a  high  resolution  plot. 

The  FORTRAN  code  can  be  written  as: 


UCIH=3 

TTYPE=i 

UMAGH=1. 

YD0UT=7 

TDELT=.2 

TEHD=5 . 

GRAFP=0 

HRDCPY=1 

CALL  BITIME (  ) 


PRECMP  DIRECTIVE 


*B1TIME 


produces  the  following  FORTRAN  statements 


CALL  BITIME (  ) 


METHOD  State  space  method,  see  Section  7.2.1.  Unlike  command  STIME,  this  command  does 
not  have  any  restrictions  on  multiple  poles. 

COMMENTS  Capability  exists  for  creating  multiple  plots  on  the  high  resolution  electrostatic 
plotter  by  setting  the  appropriate  value  for  the  parameter  CONTP.  See  Section  E.3  for  the  details. 
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B2CEQ 


B2CEQ 


PURPOSE:  Equation  definition  for  a  C;  continuous  block  used  for  automated  modeling  of 
a  continuous-discrete  multirate  system  by  connection  of  transfer  function  blocks 


Subroutine  B2CEQ  is  part  of  a  set  of  subroutines  used  for  defining  the  connection  of  s  plane  transfer 
functions  for  automated  transfer  function  analysis  of  a  continuous-discrete  multirate  system.  (See 
B2DEQ  and  B2SEQ  for  defining  the  discrete  and  sample-hold  blocks).  This  subroutine  is  to  be 
called  for  each  C;  block  defined.  Before  calling  B2CEQ,  B2DEQ,  and  B2SEQ,  the  initialization 
routine  B2INIT  must  first  be  called.  After  the  last  Cj,  Dj,  and  S;  blocks  are  defined  by  a  calls 
to  subroutines  B2CEQ,  B2DEQ,  and  B2SEQ,  respectively,  subroutine  B2END  must  be  called  to 
complete  the  connection  procedure. 


FORTRAN  CALL 


CALL  B2CEQ(  label,  indx,  isptf,  delay,  iyin,  nycin,  nxsin,  iycin,  ixsin  ) 


where,  label  =  label  for  block  Cj  (.LE.60  characters) 

indx  =  block  identifier  for  block  C;  (.LE.NDIMYC) 
isptf  =  SPTF  identifier  for  block  C; 

delay  =  delay  of  block  Cj,  not  implemented  yet,  but  must  enter  a 
dummy  value 

iyin  =  for  future  use.  Enter  a  dummy  value. 

nycin  =  number  of  continuous  blocks  connected  as  inputs  to  block  C; 
nxsin  =  number  of  sample-hold  blocks  connected  as  inputs  to  block  C; 
iycin  =  array  containing  the  identifiers  of  the  continuous  blocks  connected 
to  C[.  (negative  value  for  sign  change) 
ixsin  =  array  containing  the  identifiers  of  the  sample-hold  blocks  connected 
to  C;.  (negative  value  for  sign  change) 

The  dummy  arrays  iycin  and  ixsin  can  be  any  integer  array  dimensioned  at  least  nycin  and  nxsin, 
respectively,  which  the  user  can  declare.  For  convenience,  though,  arrays  IYCIN  and  IXSIN  in 
common  block  IYCDS  can  be  used  instead.  These  arrays  are  described  in  the  following  table. 
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COMMON/IYCDS/  parameters  used 

parameter 

preset 

description 

IYCIN 

0 

Array  containing  the  identifiers  of  the  continuous  blocks  connected 
to  C; 

IYCIN(l)  =  id  number  of  1st  continuous  block  connected  to  C; 
IYCIN(2)  =  id  number  of  2nd  continuous  block  connected  to  C; 

*  i 

IYCIN(nycin)  =  id  number  of  nycin-th  continuous  block  connected 

to  Ci 

IXSIN 

0 

Array  containing  the  identifiers  of  the  sample-hold  blocks  connected 
to  Cj 

IXSIN(l)  =  id  number  of  1st  sample-hold  block  connected  to  Ci 
IXSIN(2)  =  id  number  of  2nd  sample-hold  block  connected  to  C; 

IXSIN(nxsin)  =  id  number  of  nxsin-th  sample-hold  block  connected 

to  C; 

Example  Is  Block  C7  is  to  b«  represented  by  s  plane  transfer  SPTF4.  The  are  three  contin¬ 
uous  blocks,  Ci,  C5,  and  Cg  and  two  sample-hold  blocks,  S2  and  S4  connected 
to  the  input  of  block  C3.  Block  C3  is  to  be  labeled  as  ’FILTER  XX’.  The 
FORTRAN  code  to  define  block  C3  can  be  written  as: 

INDX=7 

ISPTF=4 

DELAY=0 

NYCIH=3 

IYCIN(1)=1 

IYCIN(2)=5 

IYCIH(3)=6 

NXSIN=2 

IXSIH(1)=2 

IXSIH(2)=4 

CALL  B2CEQ( ’FILTER  XX ’ , INDX, ISPTF, DELAY, 0, HYCIH, HXSIN, IYCIH 
+ , IXSIH) 
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PRECMP  DIRECTIVE 


*B2CEQ  label  indx  isptf  delay  iyin  nycin  nxsin 


produces  the  following  FORTRAN  statements 


CALL  B2CEQ  ( 

+label 

+, indx , isptf .delay , iyin, nycin, nxsin, IYCIB, IXSIB) 


Note  that  IYCfN  and  IXSIN  are  not  arguments  in  the 
B2CEQ  directive. 


Example  2:  Using  Example  1  from  above,  the  following  code  fragment 

*IYCM  15  6 
♦IXSIB  2  4 

♦B2CEQ  ’FILTER  XX’  740.  032 

produces  the  following  FORTRAN  statements 

IYCIB(1)=1 
IYCIB(2)=5 
IYCIB(3)=6 
IXSIB(1)=2 
IXSIN(2)=4 
CALL  B2CEQC 
+ ’FILTER  XX’ 

+.7,4,0. ,0,3,2, IYCIB, IXSIB) 

METHOD  The  Kalman-Bertram  state  space  method  is  used.  See  Chapter  7. 
COMMENTS  See  Example  18  in  Chapter  9. 
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B2DEQ 


B2DEQ 


PURPOSE:  Equation  definition  for  a  D;  discrete  block  used  for  automated  modeling  of  a 
continuous-discrete  multirate  system  by  connection  of  transfer  function  blocks 

Subroutine  B2DEQ  is  part  of  a  set  of  subroutines  used  for  defining  the  connection  of  z  plane  transfer 
functions  for  automated  transfer  function  analysis  of  a  continuous-discrete  multirate  system.  (See 
B2CEQ  and  B2SEQ  for  defining  the  continuous  and  sample-hold  blocks).  This  subroutine  is  to  be 
called  for  each  D;  block  defined.  Before  calling  B2CEQ,  B2DEQ,  and  B2SEQ,  the  initialization 
routine  B2INIT  must  first  be  called.  After  the  last  C;,  Dj,  and  S;  blocks  are  defined  by  a  calls 
to  subroutines  B2CEQ,  B2DEQ,  and  B2SEQ,  respectively,  subroutine  B2END  must  be  called  to 
complete  the  connection  procedure. 


FORTRAN  CALL 


CALL  B2DEQ(  label,  indx,  izptf,  dsampt,  delay,  iyin,  nycin,  nydin 
+  , nxsin,  iycin,  iydin,  ixsin  ) 


where,  label  =  label  for  block  Dj  (.LE.60  characters) 

indx  =  block  identifier  for  block  D;  (.LE.NDIMYD) 
izptf  =  ZPTF  identifier  for  block  D; 
dsampt  =  sampling  period  of  block  Dj 

delay  =  delay  of  block  Dj,  not  implemented  yet,  but  must  enter  a 
dummy  value 

iyin  =  for  future  use.  Enter  a  dummy  value. 

nycin  =  number  of  continuous  blocks  connected  as  inputs  to  block  D; 

nydin  =  number  of  discrete  blocks  connected  as  inputs  to  block  Dj 
nxsin  =  number  of  sample-hold  blocks  connected  as  inputs  to  block  Dj 
iycin  =  array  containing  the  identifiers  of  the  continuous  blocks  connected 
to  Dj.  (negative  value  for  sign  change) 
iydin  =  array  containing  the  identifiers  of  the  discrete  blocks  connected 
to  Dj.  (negative  value  for  sign  change) 

ixsin  =  array  containing  the  identifiers  of  the  sample-hold  blocks  connected 
to  Dj.  (negative  value  for  sign  change) 


The  dummy  arrays  iycin,  iydin,  and  ixsin  can  be  any  integer  array  dimensioned  at  least  nycin, 
nydin,  and  nxsin,  respectively,  which  the  user  can  declare.  For  convenience,  though,  arrays  IYCIN, 
IYDIN,  and  IXSIN  in  common  block  IYCDS  can  be  used  instead.  These  arrays  are  described  in 
the  following  table. 
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COMMON/IYCDS/  parameters  used 

parameter 

preset 

description 

IYCIN 

0 

Array  containing  the  identifiers  of  the  continuous  blocks  connected 
to  Dj 

IYCIN(l)  =  id  number  of  1st  continuous  block  connected  to  Dj 
IYCIN(2)  =  id  number  of  2nd  continuous  block  connected  to  D; 

IYCIN(nycin)  =  id  number  of  nycin-th  continuous  block  connected 

to  D; 

IYDIN 

0 

Array  containing  the  identifiers  of  the  discrete  blocks  connected 
to  D; 

IYDIN(l)  =  id  number  of  1st  discrete  block  connected  to  Dj 
IYDIN(2)  =  id  number  of  2nd  discrete  block  connected  to  Dj 

IYDIN(nydin)  =  id  number  of  nydin-th  discrete  block  connected 

to  D; 

IXSIN 

0 

_ 

Array  containing  the  identifiers  of  the  sample-hold  blocks  connected 
to  Dj 

IXSIN(l)  =  id  number  of  1st  sample-hold  block  connected  to  Dj 
IXSIN(2)  =  id  number  of  2nd  sample-hold  block  connected  to  D; 

IXSIN(nxsin)  =  id  number  of  nxsin-th  sample-hold  block  connected 
to  D,- 

Example  Is  Block  D8  is  to  be  represented  by  z  plane  transfer  ZPTF10  and  its  sampling 
period  is  .5  seconds.  There  is  one  continuous  blocks  C4,  two  discrete  blocks,  D3, 
and  D5,  and  one  sample-hold  block  S2  connected  to  the  input  of  block  D8.  Block 
C3  is  to  be  labeled  as  ’DIGITAL  FILTER  A,  VERSION  3’.  The  FORTRAN  code 
to  define  block  D8  can  be  written  as: 


IBDX=8 

IZPTF=10 

DSAMPT= . 5 

DELAY=0 

BYCIB=1 

IYCIB(1)=4 

NYDIB=2 

IYDIB(1)=3 

IYDIB(2)=5 

BXSIN=1 

IXSIB(1)=2 

CALL  B2DEQ( ’DIGITAL  FILTER  A,  VERSIOB  3 ' , IBDX , IZPTF , DSAMPT , DELAY 
+ , 0 , BYCIB , BYDIB , BXSIB , IYCIH , IYDIB , IXSIB) 
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PRECMP  DIRECTIVE 


*B2DEQ  label  indx  izptf  dsampt  delay  iyin  nycin  nydin  nxsin 


produces  the  following  FORTRAN  statements 

CALL  B2CEQ  ( 

+label 

+ , indx , izptf .dsampt .delay , iy in, nycin, nydin, nxs in, IYCIN 

+, iydin, ixsin) 

Note  that  IYCIN,  IYDIN,  and  IXSIN  are  not  arguments  in  the 
*B2DEQ  directive. 

Example  2:  Using  Example  1  from  above,  the  following  code  fragment 


♦IYCIN  4 
♦IYDIN  3  S 
♦IXSIN  2 

DSAMPT= . S 

♦B2DEQ  ’DIGITAL  FILTER  A,  VERSION  3’  ..  note  use  of  continuation 
8  10  DSAMPT  0.  0  1  2  1  !  character  above  and  comment  character  ! 


produces  the  following  FORTRAN  statements 


IYCIN(l)=4 
IYDIN (1) =3 
IYDIN(2)=5 
IXSIN(1)=2 
CALL  B2DEQ( 

+’ DIGITAL  FILTER  A,  VERSION  3’ 

+,8,10, DSAMPT , 0 . ,0,1, 2.1, IYCIN, IYDIN, IXSIN) 


METHOD  The  Kalman-Bertram  state  space  method  is  used.  See  Chapter  7  and  Section  C.2. 

COMMENTS  Part  of  the  automated  procedure  for  implementing  the  Kalman-Bertram  method 
of  analysis  is  computing  the  LCM  sampling  period  of  the  system.  In  specifying  the  sampling  periods 
of  each  z  transfer  function  or  sample-hold  block,  be  sure  to  use  enough  significant  digits.  Failure 
to  do  so  can  result  in  an  incorrect  LCM  calculation.  For  example,  if  the  sampling  rates  are  L,  1/3, 
and  2/3,  enter  the  sampling  rates  as  1.,  .3333333,  and  .6666666.  If  fewer  digits  were  used  instead, 
i.e.,  .3333  instead  of  .3333333,  the  LCM  will  be  incorrectly  computed. 

See  Example  18  in  Chapter  9. 
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B2EIG 


B2EIG 


PURPOSE:  Compute  eigenvalues  of  a  continuous-discrete  multirate  system  modeled  as  a 
connection  of  s  and  z  plane  transfer  functions  and  sample-hold  blocks 
POLY;  =  eigenvalues  of  system  matrix,  equivalent  to  det  [zl  -  A] 


The  eigenvalues  of  a  continuous-discrete  system  modeled  as  a  connection1  of  s  and  z  plane  transfer 
functions  and  sample-hold  blocks  are  computed.  The  z  plane  eigenvalues  computed  are  at  the  LCM 
sampling  period.2  The  printout  of  the  state  space  matrices  computed  by  this  command  is  specified 
by  the  parameter  FRNMTRX  in  common  block  DBASE  described  by  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

PRNMTRX 

0 

•EQ.O  No  printout  of  state  space  matrices 
•EQ.l  Printout  of  computed  state  space  matrices 
.EQ.2  Above  plus  intermediate  matrices 

FORTRAN  CALL 


CALL  B2EIG(  i  ) 


where,  i  =  index  for  storing  polynomial  POLYi 


Example  1 :  Compute  the  eigenvalues  of  a  continuous- discrete  system  modeled  as  a  connection 

of  s  and  z  plane  transfer  functions  and  sample-hold  blocks.  Store  the  results  into 
POLY2.  The  FORTRAN  code  can  be  written  as: 


CALL  B2EIG(2) 


PRECMP  DIRECTIVE 


*B2EIG  i 


produces  the  following  FORTRAN  statement 
CALL  B2EIG(i) 


Example  2: 

♦B2EIG  2 


produces  the  following  FORTRAN  statement 
CALL  B2EIGC2) 


METHOD  The  Kalman-Bertram  state  space  method  is  used.  See  Chapter  7. 

'Specified  by  calls  to  subroutines  B2INIT,  B2CEQ,  B2DEQ,  B2SEQ,  and  B2END. 

2 Least-common-multiple  of  all  the  sampling  periods  of  the  D;  and  S,-  connection  blocks. 
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B2END 


B2END 


PURPOSE:  Complete  the  transfer  function  connection  procedure  initiated  by  calls  to  subroutines 
B2INIT,  B2CEQ,  B2DEQ,  and  B2SEQ  for  automated  modeling  of  a  continuous- 
discrete  multirate  system 


Subroutine  B2END  is  the  last  of  a  set  of  subroutines  used  for  modeling  the  connection  of  a  set  of  (l) 
s  plane  transfer  functions,  (2)  z  plane  transfer  functions,  and  (3)  sample-hold  blocks  for  automated 
transfer  function  analysis  of  a  continuous-discrete  multirate  system.  It  checks  to  make  sure  that 
all  the  C;,  Dj,  and  S;  blocks  have  been  properly  specified.  The  connection  of  the  C;,  Dj,  and  S; 
blocks  specified  by  the  calls  to  subroutines  B2CEQ,  B2DEQ,  and  B2SEQ,  respectively,  is  printed 
out. 


FORTRAN  CALL 


CALL  B2END(  ) 


PRECMP  DIRECTIVE 


*B2END 


produces  the  following  FORTRAN  statement 
CALL  B2EUDC  ) 

COMMENTS  If  a  Cj,  D;,  or  S;  block  has  not  been  properly  specified  the  program  will  abort. 
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B2FREQ 


B2FREQ 


PURPOSE:  Compute  SISO  frequency  response  between  blocks  D;  and  Dj  of  a  continuous- 
discrete  multirate  system  modeled  as  a  connection  of  s  and  z  plane  transfer 
functions  and  sample-hold  blocks 


A  SISO  frequency  response  of  a  z  plane  transfer  function  is  computed  for  a  continuous-discrete 
multirate  system  modeled  as  a  connection1  of  s  and  z  plane  transfer  functions  and  sample-hold 
blocks.  The  discrete  connection  block  D;  which  the  input  is  connected  to  is  specified  by  parameter 
UDIN.  The  magnitude  of  the  input  is  specified  by  the  parameter  UMAGN.  The  discrete  connection 
block  Dj  which  defines  the  the  output  is  specified  by  the  parameter  YDOUT.  The  sampling  period 
of  this  transfer  function  will  be  the  computed  LCM  sampling  period.2  Parameter  PRNMTRX  is 
used  to  to  specify  the  type  of  output  for  the  state  space  matrices  computed  by  this  command. 
These  parameters  are  in  common  block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

UDIN 

0 

D;  block  number  where  input  u  is  connected  to 

UMAGN 

I. 

Magnitude  of  the  input  u 

YDOUT 

0 

D;  block  number  defining  the  output 

PRNMTRX 

0 

.EQ.O  No  printout  of  state  space  matrices 
.EQ.l  Printout  of  computed  state  space  matrices 
.EQ.2  Above  plus  intermediate  matrices 

This  command  differs  from  commaiH  ZFREQ  which  computes  the  frequency  response  of  a  z  plane 
transfer  function  ZPTF;  represented  in  rational  function.  Command  B2FREQ  computes  the  fre¬ 
quency  response  of  a  transfer  function  directly  from  a  state  space  representation  of  a  system  modeled 
by  a  connection  of  SPTFj  and  ZPTF;  transfer  functions.  It  uses  Laub’s  method  which  does  not 
involve  the  computation  of  the  poles  and  zeros  of  the  transfer  function. 

Command  B2FREQ  is  an  alternate  method  for  computing  the  frequency  response  of  a  system 
modeled  as  a  connection  of  SPTF;  and  ZPTFj  transfer  functions.  The  combination  of  cunmands 
B2TF  and  ZFREQ  will  yield  the  poles  and  zeros  as  well  as  the  frequency  response  of  a  transfer 
function.  As  discussed  in  Section  7.2,  computation  of  the  poles  and  zeros  is  a  difficult  numerical 
problem  to  solve  in  a  reliable  and  accurate  manner.  If  the  accuracy  of  the  poles  or  zeros  from  a 
B2TF  command  are  in  question,  command  B2FREQ  can  be  used  to  check  the  frequency  response 
of  ?  transfer  function  computed  by  the  combination  of  commands  B2TF  and  ZFREQ 

Two  modes  are  available  for  selecting  the  frequency  points  used  Ur  evaluating  the  frequency  re 
spouse  of  the  transfer  function.  The  automatic  mode,  selected  when  FAUTO  is  nonzero,  allows  the 
user  to  specify  up  to  20  preselected  frequencies  with  the  array  OMEGA.  In  this  mode  the  program 
will  use  all  these  preselected  points  plus  its  own  dynamically  generated  points  to  yield  a  smooth 

'With  calls  to  subroutines  B2INIT,  B2CEQ,  B2DEQ,  B2SEQ,  and  B2END 

2  Lowest-common-multiple  of  the  sampling  periods  of  the  D;  and  Si  blocks  (which  is  computed  by  the  program 
from  da'a  entered  in  the  calls  to  B2DEQ  and  B2SEQ). 


plot.  The  number  of  preselected  points  is  determined  by  NOMEGA.  The  beginning  and  last  fre¬ 
quency  points  for  computing  the  response  is  determined  by  OMEGA(l)  and  OMEGA(NOMEGA), 
respectively. 

In  the  nonautomatic  frequency  mode  (FAUTO=0)  the  user  can  define  up  to  five  sets  of  frequencies 
to  be  used  in  computing  the  response.  Each  of  these  sets  is  specified  by  a  three  element  array 
of  the  form  FREQk(i),  i=l,3.  If  FREQk(l)=a,  FREQk(2)=b  and  FREQk(3)=c,  the  k-th  set  of 
frequencies  specified  is: 

a,  a+c,  a+2c,  ...  a+jc,  b 

where  j  is  the  largest  integer  such  that  (a+jc)  is  less  than  b.  Each  successive  FREQk  array  must 
define  an  increasing  set  of  frequencies  such  that  the  first  value  of  the  segment  is  always  larger  than 
the  last  value  of  the  preceding  segment.  When  FREQk(3)  is  not  larger  than  FREQk(l),  as  in  the 
case  with  the  preset  values  for  k  =  2,  5  ,  those  segments  will  not  be  used. 

With  either  the  automatic  or  the  nonautomatic  frequency  mode,  the  program  will  automatically 
check  for  the  gain  and  phase  crossover.  When  found,  the  program  will  iterate  until  the  exact 
crossover  frequency  is  found.  The  limit  on  the  number  of  plot  points  computed  is  1500. 

The  units  used  for  representing  transfer  functions  are  in  rad/sec.  For  frequency  response  calcula¬ 
tions,  the  frequencies  used  for  evaluating  the  response  can  either  be  in  rad/sec  or  Hz.  A  nonzero 
vain**  for  the  parameter  RAD  will  select  the  units  rad/sec,  while  a  zero  value  will  select  Hz. 

Bode,  Nichols,  and  Nyquist  plots  are  selected  by  the  values  of  the  flags  FBODE,  FNICO,  FNYQS, 
respectively.  See  the  table  in  the  Reference  for  command  ZFREQ  for  the  definition  and  default 
values  of  parameters  used  by  command  B2FREQ. 

FORTRAN  CALL  (CALL  B2FREQ(  ) 

Example  Is  Assume  that  a  system  has  been  modeled  as  a  connection  of  SPTF;  and  ZPTFj 
transfer  functions  with  calls  to  subroutines  B2INIT,  B2CEQ,  B2DEQ,  B2SEQ 
and  B2END.  Compute  the  frequency  response  of  the  transfer  function  from  block 
D3  to  block  D7  using  the  auto  frequency  mode  for  frequencies  between  1.  and 
100.  and  at  10.  Select  printer  and  hardcopy  Bode  plots  with  auto  scaling.  The 
FORTRAN  code  can  be  written  as: 

UDIH=3 

YD0UT=7 

UMAGN=1. 

FAUT0=1 
N0MEGA=3 
0MEGA(1)=1 . 

OMEGA(2)=iO. 

OMEGA(3)=100 . 

FB0DE=1 
GRAFP=1 
HRDCPY=1 
CALL  B2FREQC  ) 
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PRECMP  DIRECTIVE 


♦B2FREQ 


produces  the  following  FORTRAN  statement 


CALL  B2FREQ(  ) 


Example  2:  Using  Example  1  from  above,  the  following  code  fragment 


UDIN=3 
YD0UT=7 
UMAGN=1 . 
FAUT0=1 
N0MEGA=3 
*0MEGA  1  10  100 
FB0DE=1 
GRAFP=1 
HRDCPY=1 
♦B2FREQ 


produces  the  same  FORTRAN  code  as  in  Example  1. 

METHOD  Section  7.2  describes  how  a  state  space  representation  is  computed  for  a  system 
modeled  by  a  connection  of  SPTFi  and  ZPTF;  transfer  functions.  See  the  Reference  for  command 
ZFREQ  on  how  the  frequency  points  are  automatically  selected  if  the  parameter  FAUTO  is  nonzero. 

If  a  frequency  point  being  used  to  evaluate  the  response  is  equal  to  a  pole  on  the  unit  circle,  the 
warning  message 

(z*I  -  A)  IS  SINGULAR  TO  WORKING  PRECISION  AT  OMEGA  =  . . . ,  THIS  POINT  SKIPPED 
will  be  printed  out  and  the  program  allowed  to  continue. 

COMMENTS  The  sampling  periods  for  both  the  discrete  connection  blocks  used  to  define  the 
input  and  output  of  the  transfer  function  must  be  equal  to  the  computed  LCM  sampling  period. 
(Note:  The  parameter  SAMPT  is  not  by  this  command.) 
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B2INIT 


B2INIT 


PURPOSE:  Initialization  routine  for  automated  modeling  of  a  continuous-discrete  multirate 
system 


Subroutine  B2INIT  is  the  first  of  a  set  of  subroutines  used  for  modeling  the  connection  of  s  plane 
transfer  functions,  z  plane  transfer  functions,  and  sample-hold  blocks  for  automated  transfer  func¬ 
tion  analysis  of  a  continuous-discrete  multirate  system.  This  initialization  is  used  primarily  to  let 
the  program  know  that  a  set  of  calls  to  subroutines  B2CEQ,  B2DEQ,  and  B2SEQ  will  follow  which 
will  specify  the  connection  of  each  C;,  D;,  and  S;  block. 


FORTRAN  CALL 


CALL  B2INIT(  tlabel,  oldnew,  ncblk,  ndblk,  nshblk  ) 


where,  tlabel 
oldnew 

ncblk 

ndblk 

nshblk 


label  for  block  2  connection  (.LE.60  characters) 
’OLD’  for  old  data,  (no  initialization) 

’NEW*  for  new  data,  (initializes  all  connections) 
number  of  s  plane  connection  blocks 
number  of  z  plane  connection  blocks 
number  of  sample-hold  connection  blocks 


Example  1:  A  continuous-discrete  system  with  7  s  plane  transfer  function  block,  4  z  plane 

transfer  function  blocks,  and  2  sample-hold  blocks  is  to  be  modeled  for  automated 
transfer  function  analysis.  The  model  is  to  be  labeled  as  ’PROJECT  ABC’.  The 
FORTRAN  code  for  initializing  the  connection  of  this  model  can  be  written  as: 

CALL  B2INIT( ’PROJECT  ABC’ , ’HEW’ ,7,4,2) 


PRECMP  DIRECTIVE  j  *B2INIT  tlabel’  oldnew  ncblk  ndblk  nshblk 

produces  the  following  FORTRAN  statement 
CALL  B1IHIT( 

+tlabel 

+ .oldnew , ncblk, ndblk, nshblk) 

Example  2:  Using  Example  1  from  above,  the  following  code  fragment 

+B2IHIT  ’PROJECT  ABC’  ’HEW’  742 

produces  the  following  FORTRAN  statement 

CALL  B2INITC ’PROJECT  ABC’ 

+, ’HEW’ .7,4,2) 

COMMENTS  See  Chapter  7. 
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B2LOAD 


B2LOAD 


PURPOSE:  Loads  a  file  of  block  diagram  connection  data  previously  saved  with  the  command 
B2SAVE 


FORTRAN  CALL 


CALL  B2LOAD(  file_name  ) 


where,  file_name  =  local  file  name  (.LE.7  characters) 

(the  local  file  must  be  attached  before  execution  of  a  batch  job) 


Example  1:  Load  transfer  function  connection  data  for  modeling  a  continuous-discrete  mul¬ 

tirate  system  from  local  file  B2DATA.  The  FORTRAN  code  can  be  written  as: 


CALL  B2L0AD ( ’ B2DATA ’ ) 


PRECMP  DIRECTIVE 


*B2LOAD  file-name 


produces  the  following  FORTRAN  statement 


CALL  B2L0AD(file_name) 

Example  2:  *B2L0AD  ’B2DATA  ’ 

produces  the  following  FORTRAN  statement 
CALL  B2L0AD( ’B2DATA’) 

COMMENTS  See  the  Reference  for  command  BlSAVE  for  description  of  the  file. 
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B2LOCI 


B2LOCI 


PURPOSE:  Automated  z  plane  root  loci  of  a  continuous-discrete  multirate  system  modeled  as 
a  connection  of  s  and  z  plane  transfer  functions  and  sample-hold  blocks 

A  z  plane  root  locus  is  automatically  computed  for  a  continuous-discrete  multirate  system  modeled 
as  a  connection1  of  s  and  z  plane  transfer  functions  and  sample-hold  blocks.  This  is  a  more  general 
root  loci  command  than  ZLOCI  which  comput  es  the  root  locus  by  varying  the  loop  gain  of  a  ZPTFi 
transfer  function.  With  the  B2L0CI  command,  the  root  locus  is  computed  by  varying  the  gain  of 
any  C;  or  D;  block.  The  gains  to  be  used  are  multipliers  of  the  transfer  function  associated  with 
the  C-,  or  D;  block  selected.  Thus  the  gains  should  begin  at  a  value  less  than  1.0  and  end  with 
a  value  greater  than  1.0  if  the  loci  is  to  bracket  the  nominal  operating  gain  of  the  system.  The 
method  of  specifying  the  gains  to  be  used  in  computing  the  root  loci  is  identical  to  that  used  by 
command  ZLOCI.  The  printout  of  the  state  space  matrices  computed  by  this  command  is  specified 
by  the  parameter  PRNMTRX  in  common  block  DBASE  described  by  the  following  table. 


COMMON/DBASE/  parameters  used 

description 

PRNMTRX 

0 

.EQ.O  No  printout  of  state  space  matrices 
.EQ.l  Printout  of  computed  state  space  matrices 
|  .EQ.2  Above  plus  intermediate  matrices 

Up  to  25  preselected  gains  for  evaluating  the  root  loci  can  be  specified  with  array  KGAIN.  The 
number  of  preselected  gains  is  determined  by  NLOCI.  The  beginning  and  last  gains  are  determined 
by  KGAIN(l)  and  KGAIN(NLOCI),  respectively.  Additional  gains  can  be  automatically  computed 
by  the  program  to  fill  in  values  between  the  preselected  gains.  Between  KGAIN(i)  and  KGAIN(i-Pl ), 
additional  gains  will  be  selected  by  either  of  the  following  two  methods  if  they  are  between  KGAIN(i) 
and  KGAIN(i+l). 

If  KFLG.EQ.O,  gain  =  KGAIN(i)  +  KDELT*j,  j=l,2,  ... 

If  KFLG.NE.O,  gain  =  KGAIN(i)*KDELT**j,  j=l,2,  ... 

For  example,  if  KGAIN(2)^10,  KGAIN(3)=100,  KFLG  =  1,  and  KDELT=2,  the  following  gains 
will  be  used  to  compute  the  root  loci: 

.  .  .  10.,  20.,  40.,  80.,  100.,  .  .  . 

The  total  number  of  gains  used  is  limited  by  the  value  of  the  parameter  ITLOC  which  is  preset  to 
50.  Parameters  used  by  B2LOCI  are  given  in  the  following  table. 


'Specified  with  calls  to  subroutines  B2INIT,  B2CEQ,  B2DEQ,  B2SEQ,  and  B2END. 
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COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

NLOCI 


KGA1N 


Number  of  root  locus  gains  entered  in  array  KGAIN  (max  =  25) 


ITLOC 


GRAFP  1 


HRDCPY  0 


RLXMIN  0. 


Array  of  root  locus  gains 

KGAIN(l)  =  first  user-specified  root  locus  gain 

KGAIN(2)  =  second  user-specified  root  locus  gain 
KGAIN(NLOCI)  =  last  user-specified  root  locus  gain. 

(Gains  computed  and  used  only  if  they  are  between  KGAIN(l) 
and  KGAIN(NLOCl)  ) 

.EQ.O  to  increment  gain  by  multiplying  by  KDELT 
.NE.O  to  increment  gain  by  adding  by  KDELT 

Value  lor  changing  gains  (preset  to  large  value  so  that  no  add 
itional  gains  are  computed). 

Max.  number  of  different  gains  computed 

.NE.O  for  low  resolution  printer  plots 

.NE.O  for  high  resolution  electrostatic  plots 

Min.  x  axis  for  plotting 

Max.  x  axis  for  plotting  (Auto,  scaling  of  x  axis 
if  RLXMIN=RLXMAX) 

Min.  y  axis  for  plotting 

Max.  y  axis  for  plotting  (Auto,  scaling  of  y  axis 
if  RLYMIN=RLYMAX) 

Flag  for  numbering  root  locus  points  on  hardcopy  plots 
.EQ.l  for  numbering;  .EQ.-l  for  no  numbering 

FORTRAN  CALL  CALL  B2LOCI(  blktyp,  indx  ) 

where,  blktyp  =  ’C’  if  root  locus  gain  is  to  be  applied  to  a  continuous  block 
’D’  if  root  locus  gain  is  to  be  applied  to  a  discrete  block 
indx  =  block  identifier  of  Cj  or  Dj  block  where  gain  is  to  be  varied 

(.LE.  number  of  continuous  or  discrete  connection  blocks  specified  in 
call  to  B2INIT) 
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Example  1:  Compute  the  root  locus  of  continuous-discrete  system  modeled  as  a  connection  of 

transfer  function  blocks  by  varying  the  gain  of  block  D4  from  2  to  20  by  doubling 
the  first  gain  until  the  last  gain  is  reached.  Select  printer  and  hardcopy  plots 
with  auto  scaling.  The  FORTRAN  code  can  be  written  as: 


NL0CI=2 

KGAIN(1)=2 

KGAIN(2)=20 

XFLG=0 

KDELT=2 

GRAFP=1 

HRDCPY=1 

CALL  E2L0CI(,D\4) 


PRECMP  DIRECTIVE 


♦  B2LOCI  blktyp  indx 


produces  the  following  FORTRAN  statement 
CALL  B2L0CI(blktyp, indx) 


Example  2: 

♦B2L0CI  ’D’  4 


produces  the  following  FORTRAN  statement 
CALL  B2L0CI('D\4) 


METHOD  The  Kalman- Bertram  state  space  method  is  used.  See  Chapter  7  and  Section  C.2. 

COMMENTS  The  connection  of  the  transfer  function  blocks  must  represent  the  closed  loop 
configuration  of  the  system. 
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B2SAVE 


B2SAVE 


PURPOSE:  Save  the  transfer  function  connection  data  for  modeling  a  continuous-discrete 
multirate  system  to  a  local  file 


This  subroutine  will  save  the  transfer  function  connection  data1  for  modeling  a  continuous-discrete 
multirate  system.  The  data  will  be  saved  to  a  local  file  which  the  user  can  reuse  in  the  same  job  by 
reloading  it  with  the  B2LOAD  command.  If  the  file  is  to  be  used  in  a  subsequent  batch  job  or  an 
interactive  session,  it  must  be  SAVEd  (CRAY)  or  CATALOGed  (CDC)  upon  exit  from  LCAP2. 


FORTRAN  CALL 


CALL  B2SAVE(  filename  )  j 


where,  file_name  =  local  file  name  (.LE.7  characters) 


Example  1:  Store  the  transfer  function  connection  data  for  modeling  a  continuous- discrete 

multirate  system  in  a  local  file  named  B2DATA.  The  FORTRAN  code  can  be 
written  as: 


CALL  B2SAVE( ’B2DATA’ ) 


PRECMP  DIRECTIVE 


♦B2SAVE  filename 


produces  the  following  FORTRAN  statement 
CALL  B2SAVE (filename) 

Example  2:  *B2SAVE  ’B2DATA  ’ 

produces  the  following  FORTRAN  statement 
CALL  B2SAVEC ’B2DATA ’ ) 

METHOD  See  the  Reference  for  command  BlSAVE  for  description  of  the  file. 


'Specified  by  calls  to  subroutines  B21NIT,  B2CEQ,  B2DEQ,  B2SEQ,  and  B2END. 
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B2SEQ 


B2SEQ 


I 

PURPOSE:  Equation  definition  for  a  S;  sample-hold  block  used  for  automated  modeling 
of  a  continuous-discrete  multirate  system  by  connection  of  transfer  function 
blocks 


Subroutine  B2SEQ  is  part  of  a  set  of  subroutines  used  for  defining  the  connection  of  a  set  of  sample- 
hold  blocks  for  automated  transfer  function  analysis  of  a  continuous-discrete  multirate  system.  (See 
B2CEQ  and  B2DEQ  for  defining  the  continuous  and  discrete  blocks).  This  subroutine  is  to  be 
called  for  each  S;  block  defined.  Before  calling  B2CEQ,  B2DEQ,  and  B2SEQ,  the  initialization 
routine  B2INIT  must  first  be  called.  After  the  last  C;,  D;,  and  Sj  blocks  are  defined  by  a  calls 
to  subroutines  B2CEQ,  B2DEQ,  and  B2SEQ,  respectively,  subroutine  B2END  must  be  called  to 
complete  the  connection  procedure. 

At  the  present  time  the  implementation  of  B2SEQ  only  allows  S;  block  to  have  only  one  input, 
either  an  output  from  a  D;  block  or  another  S;  block.  If  the  input  is  from  a  D;  block,  their  sampling 
periods  must  be  equal.  If  not,  modeling  of  this  connection  must  be  changed  by  inserting  another 
sample-hold  block  between  them  which  has  a  sampling  period  equal  to  that  for  the  discrete  block. 

FORTRAN  CALL  |  CALL  B2SEQ(  label,  indx,  ssampt,  delay,  nydin,  nxsin,  iydin,  ixsin  ) 


where,  label 
indx 
ssampt 
delay 

nvdin 

nxsin 

iydin 

ixsin 


label  for  block  Sj  (.LE.60  characters) 
block  identifier  for  block  S;  (.LE.NDIMXS) 
sampling  period  of  block  Sj 

delay  of  block  S;,  not  implemented  yet,  but  must  enter  a 
dummy  value 

number  of  discrete  blocks  connected  as  inputs  to  block  S; 

(0  or  I) 

number  of  sample-hold  blocks  connected  as  inputs  to  block  S; 
(0  or  i) 

array  containing  the  identifiers  of  the  discrete  blocks  connected 
to  Sj.  (negative  value  for  sign  change) 
array  containing  the  identifiers  of  the  sample-hold  blocks 
connected  to  S;.  (negative  value  for  sign  change) 


The  dummy  arrays  iydin,  and  ixsin  can  be  any  integer  array  dimensioned  at  least  nydin,  and  nxsin, 
respectively,  which  the  user  can  declare.  For  convenience,  though,  arrays  IYDIN,  and  IXSIN  in 
common  block  IYCDS  can  be  used  instead.  These  arrays  are  described  in  the  following  table. 
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COMMON/IYCDS/  parameters  used 

_ , 

1-  neter 

preset 

description 

IYbi 

0 

Array  containing  the  identifiers  of  the  discrete  blocks  connected 
to  S; 

IYDIN(l)  =  id  number  of  1st  discrete  block  connected  to  S; 
IYDIN(2)  =  id  number  of  2nd  discrete  block  connected  to  Sj 

IYDIN(nydin)  —  id  number  of  nydin-th  discrete  block  connected 

to  Sj 

IXSIN 

0 

Array  containing  the  identifiers  of  the  sample-hold  blocks  connected 
to  Sjncjx 

IXSIN(l)  =i  id  number  of  1st  sample-hold  block  connected  to  S; 
IXSIN(2)  -  id  number  of  2nd  sample-hold  block  connected  to  S; 

IXSIN(nxsin)  =  id  number  of  nxsin-th  sample-hold  block  connected 

to  Si 

Example  1:  The  sampling  period  of  block  S3  is  2.5  seconds.  There  is  one  discrete  blocks,  D2, 

connected  to  the  it.  Block  S3  is  to  be  labeled  as  ’SLOW  RATE  ZERO-ORDER 
HOLD’.  The  FORTRAN  code  to  define  block  S3  can  be  written  as: 

IHDX=3 

SSAMPT=2 . 5 

DELAY=0 

NYDIN=1 

IYDIU(1)=2 

NXSIN=0 

CALL  B2SEQ( ’SLOW  RATE  ZERO-ORDER  HOLD' , INDX, SSAMPT, DELAY 
+ , NYDIN , NXSIN , IYDIN , IXSIN) 


PRECMP  DIRECTIVE 


★  B2SEQ  label  indx  ssampt  delay  nydin  nxsin 


produces  the  following  FORTRAN  statement 

CALL  B2SEq  ( 

-•-label 

+ , indx , ssampt .delay , nydin, nxsin, IYDIN, IXSIN) 

Note  that  IYDIN  and  IXSIN  are  not  arguments  in  the 
*B2SEQ  directive. 


A  42 


Example  2:  Using  Example  1  from  above,  the  following  code  fragment 


♦IYDIB  2 

SSAMPT=.5 

♦B2SEQ  ’SLOW  RATE  ZERO-ORDER  HOLD’  3  SSAMPT  0.  1  0 


produces  the  following  FORTRAN  statement 


IYDIU(1)=2 
CALL  B2SEQC 

+ ’SLOW  RATE  ZERO -ORDER  HOLD’ 

+ , 3 , SSAMPT, 0 . ,1,0, IYDIN , IXSIH) 


METHOD  The  Kalman-Bertram  state  space  method  is  used.  See  Chapter  7. 

COMMENTS  Part  of  the  automated  procedure  for  implementing  the  Kalman-Bertram  method 
of  analysis  is  computing  the  LCM  sampling  period  of  the  system.  In  specifying  the  sampling  periods 
of  each  z  transfer  function  or  sample-hold  block,  be  sure  to  use  enough  significant  digits.  Failure 
to  do  so  can  result  in  an  incorrect  LCM  calculation.  For  example,  if  the  sampling  rates  are  1,  1/3, 
and  2/3,  enter  the  sampling  rates  as  1.,  .3333333,  and  .6666666.  If  fewer  digits  were  used  instead, 
i.e.,  .3333  instead  of  .3333333,  the  LCM  will  be  incorrectly  computed. 

See  Example  18  in  Chapter  9. 
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B2TF 


B2TF 

PURPOSE:  Automated  SISO  transfer  function  between  blocks  D;  and  Dj  of  a  continuous- 
discrete  multirate  system  modeled  as  a  connection  of  s  and  z  plane  transfer 
functions  and  sample-hold  blocks 
ZPTFi  =  SISO  transfer  function  evaluated 

An  SISO  transfer  function  is  automatically  evaluated  for  a  continuous-discrete  multirate  system 
modeled  as  a  connection1  of  s  and  z  plane  transfer  functions  and  sample-hold  blocks.  The  discrete 
connection  block  Dj  is  specified  by  parameter  UDIN.  The  magnitude  of  the  input  is  specified  bv 
the  parameter  UMAGN.  The  discrete  connection  block  Dj  which  defines  the  output  is  specified  by 
the  parameter  YDOUT.  The  sampling  period  of  the  z  plane  transfer  function  computed  will  be  the 
LCM  sampling  period.2  Parameter  PRNMTRX  is  used  to  specify  the  type  of  output  for  the  state 
space  matrices  computed  by  this  command.  These  parameters  are  in  the  common  block  DBASE 
described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

UDIN 

0 

D;  block  number  where  input  u  is  connected  to 

UMAGN 

1. 

Magnitude  of  the  input  u 

YDOUT 

0 

D;  block  number  defining  the  output 

PRNMTRX 

0 

.EQ.O  No  printout  of  state  space  matrices 
.EQ.l  Printout  of  computed  state  space  matrices 
.EQ.2  Above  plus  intermediate  matrices 

FORTRAN  CALL 


CALL  B2TF(  i  ) 


where,  i  =  index  for  storing  evaluated  transfer  function  ZPTFi 


Example  1: 


Compute  the  transfer  function  from  D3  to  De  for  a  unit  input.  Store  the  resulting 
transfer  function  in  ZPTF2-  The  FORTRAN  code  can  be  written  as: 


UDIHf=3 

YD0UT=6 

UMAGB=1. 

CALL  B2TF(2) 

PRECMP  DIRECTIVE  [*B2TF  i 


produces  the  following  FORTRAN  statement 
CALL  BlTF(i) 


'Specified  by  calls  to  subroutines  B2INIT,  B2CEQ,  B2DEQ,  B2SEQ,  and  B2END. 

1  Lowcst-common-multiple  of  the  sampling  period  of  the  D;  and  S;  blocks  (which  is  computed  by  the  program 
from  data  entered  in  the  calls  to  B2DEQ  and  B2SEQ). 
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Example  2: 


*B2TF  2 


produces  the  following  FORTRAN  statement 

CALL  B2TF(2) 

METHOD  The  Kalman- Bertram  state  space  method  is  used  to  model  the  system.  The  QR  and 
QZ  methods  are  used  to  find,  respectively,  the  poles  and  zeros  of  the  transfer  function.  See  Chapter 
7  and  Section  C.2. 

RESTRICTIONS  A  transfer  function  can  only  be  computed  between  two  D;  blocks  which  are 
at  fhe  LCM  sampling  period.  It  is  possible  to  have  an  LCM  sampling  period  which  will  be  larger 
than  the  sampling  period  of  the  slowest  sampler.  For  example,  a  two  rate  sampled  system  with 
sampling  periods  of  2  and  .1  seconds,  respectively,  will  have  an  LCM  sampling  period  of  6  seconds. 

COMMENTS  See  Example  18  in  Chapter  9. 


B2TIME 


B2TIME 


PURPOSE:  Compute  SISO  time  response  between  blocks  Dj  and  Dj  of  a  continuous-discrete 
multirate  system  modeled  as  a  connection  of  s  and  z  plane  transfer  functions  and 
sample-hold  blocks 


An  SISO  time  response  is  automatically  evaluated  for  a  continuous-discrete  multirate  system  mod¬ 
eled  as  a  connection1  of  s  and  z  plane  transfer  functions  and  sample-hold  blocks.  The  discrete 
connection  block  Dj  which  the  input  is  connected  to  is  specified  by  parameter  UDIN.  The  type 
of  input  and  its  magnitude  is  specified,  respectively,  by  parameters  TTYPE  and  UMAGN.  The 
discrete  connection  block  Dj  which  defines  the  output  is  specified  by  parameter  YDOUT.  The 
response  will  be  evaluated  at  multiples  of  the  LCM  sampling  period2  from  t=0  to  t=TEND.  Pa¬ 
rameter  PRNMTRX  is  used  to  specify  the  type  of  output  for  the  state  space  matrices  computed 
by  this  command.  Parameters  used  by  B2TIME  are  in  common  block  DBASE  described  in  the 
following  table. 


COMMON/DBASE/  parameters  used 


parameter 


UDIN 

TTYPE 


YDOUT 


TEND 


PRNMTRX 


preset 


0 


CONTP 


description 


D;  block  number  where  input  u  is  connected  to 
.EQ.O  for  impulse  response;  .EQ.l  for  step  response 


Magnitude  of  input 


Dj  block  number  defining  the  output 


End  time  for  evaluating  time  response 


.EQ.O  No  printout  of  state  space  matrices 
.EQ.l  Printout  of  computed  state  space  matrices 
.EQ.2  More  printout  of  computed  state  space  matrices 


.NE.O  for  low  resolution  printer  plots 


.NE.O  for  high  resolution  electrostatic  plots 


Minimum  x  axis  for  time  plot 


Maximum  x  axis  for  time  plot 

(Auto  scaling  of  x  axis  if  TXMIN=TXMAX) 


Minimum  y  axis  for  time  plot 


Maximum  y  axis  for  time  plot 

(Auto  scaling  of  y  axis  if  TYMIN=TYMAX) 


=0  Single  curve  plot 
=  1  First  curve  of  a  plot 
=2  Continuation  of  a  plot 
=3  Final  curve  of  a  plot 


FORTRAN  CALL  CALL  B2TIME(  ) 


‘Specified  by  calls  to  subroutines  B2INIT,  B2CEQ,  B2DEQ,  B2SEQ,  and  B2END. 

’Lowest-common-multiple  of  the  sampling  periods  of  the  Di  and  Si  blocks  (which  is  computed  by  the  program 
from  the  data  entered  in  the  calls  to  B2DEQ  and  B2SEQ). 
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Example  1:  Assume  that  a  system  has  been  modeled  as  a  connection  of  SPTFj  and  ZPTFj 

transfer  functions  with  calls  to  subroutines  B2INIT,  B2CEQ,  B2DEQ,  B2SEQ, 
and  B2END.  Compute  the  step  response  from  block  D3  to  block  D7  from  t-0 
to  t-5  seconds.  Select  only  a  high  resolution  plot. 

The  FORTRAN  code  can  be  written  as: 


UDIN=3 
TTYPE=1 
UHAGN=1 . 
YDQUT=7 
TEND=5 . 

GRAFP=0 

HRDCPY=1 

CALL  B2TIHE(  ) 


PRECMP  DIRECTIVE 


*B2TIME 


produces  the  following  FORTRAN  statements 


CALL  B2TIME(  ) 


METHOD  See  Section  7.2.2 

RESTRICTIONS  The  sampling  periods  for  both  of  the  discrete  connection  blocks  used  to  define 
the  input  and  output  of  the  time  response  must  be  equal  to  the  computed  LCM  sampling  period. 
(Note:  The  sampling  period  SAMPT  is  not  used  by  this  command.) 

COMMENTS  Capability  exists  for  creating  multiple  plots  on  the  high  resolution  electrostatic 
plotter  by  setting  the  appropriate  value  for  the  parameter  CONTP.  See  Section  E.3  for  the  details. 
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CPYPS 


CPYPS 


PURPOSE:  Copy  polynomials  into  an  s  plane  transfer  function 

SPTFi  =  POLYj  /  POLYw 


FORTRAN  CALL 


CALL  CPYPS(  i  ,  j  ,  k  ) 


where,  i  —  index  of  s  plane  transfer  function 

j  =  index  of  polynomial  for  the  numerator 
k  —  index  of  polynomial  for  the  denominator 


Example  1:  Copy  POLYi  and  POLY4  into  the  numerator  and  denominator  of  SPTF5.  The 

FORTRAN  code  can  be  written  as: 


CALL  CPYPS(5,2,4) 


PRECMP  DIRECTIVE 


*CPYPS  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  CPYPS(i,j,k) 

Example  2:  *CPYPS  S  2  4 


produces  the  following  FORTRAN  statement 

CALL  CPYPS(S,2,4) 

METHOD  Copies  coefficients  of  polynomials  into  a  transfer  function.  If  the  roots  of  the  polyno¬ 
mials  are  also  defined,  they  are  copied  into  the  transfer  function. 

COMMENTS  CPYPS  is  used  with  commands  DTERM  or  DETRM  for  evaluating  a  transfer 
function  from  a  set  of  Laplace  transformed  differentia]  equations. 
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CPYPW 


CPYPW 


PURPOSE:  Copy  polynomials  into  a  w  plane  transfer  function 

WPTFj  =  POLYj  /  POLYk 


This  command  is  similar  to  CPYPS  except  that  it  is  for  use  with  a  w  plane  transfer  function  instead 
of  an  s  plane  transfer  function. 


CPYPZ  CPYPZ 

PURPOSE:  Copy  polynomials  into  a  z  plane  transfer  function 
ZPTFi  =  POLYj  /  POLYk 

This  command  is  similar  to  CPYPS  except  that  it  is  for  use  with  a  z  plane  transfer  function  instead 
of  an  s  plane  transfer  function. 
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CPYSP 


CPYSP 


PURPOSE:  Copy  s  plane  transfer  function  into  two  polynomials 

POLYj  =  SPTFi 
POLYk  =  SPTFi 


FORTRAN  CALL 


CALL  CPYSP(  i  ,  j  ,  k  j 


where,  i  =  index  of  s  plane  transfer  function 

j  =  index  of  polynomial  for  the  numerator  of  the  transfer  function 
k  —  index  of  polynomial  for  the  denominator  of  the  transfer  function 


Example  1:  Copy  numerator  of  SPTF5  into  POLY2  and  denominator  of  SPTF5  into 

POLY4.  The  FORTRAN  code  can  be  written  as: 


CALL  CPYSP(5,2,4) 


PRECMP  DIRECTIVE 


♦CPYSP  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  CPYSP (i.j.k) 

Example  2: 

+SZXFH  524 

produces  the  following  FORTRAN  statement 
CALL  CPYSP (5, 2 ,4) 

METHOD  Copies  coefficients  of  a  transfer  function  into  two  polynomials.  If  the  roots  of  the 
transfer  function  are  also  defined,  they  are  copied  into  the  polynomials. 
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CPYWP 


CPYWP 


PURPOSE:  Copy  w  plane  transfer  function  into  two  polynomials 

POLYj  =  WPTF; 

POLYk  -  WPTF; 


This  command  is  similar  to  CPYSP  except  that  it  is  for  use  with  a  w  plane  transfer  function  instead 
of  an  s  plane  transfer  function. 


CPYZP  CPYZP 

PURPOSE:  Copy  z  plane  transfer  function  into  two  polynomials 
POLYj  =  ZPTF; 

POLYk  -  ZPTF; 


This  command  is  similar  to  CPYSP  except  that  it  is  for  use  with  a  z  plane  transfer  function  instead 
of  an  s  plane  transfer  function. 
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DETRM 


DETRM 


PURPOSE:  Compute  determinant  of  a  matrix  with  polynomial  elements  (old  version) 
POLY;  =  determinant  of  a  matrix  with  polynomial  elements 


Determinant  of  a  matrix  polynomial  is  used  in  evaluating  an  SISO  transfer  function  from  a  set  of 
Laplace  transformed  differential  equations.  Given  a  system  described  by: 

M(s)  X(s)  =  B(s)  u(s) 

where,  M(s)  =  M4  s4  +  M3  s3  +  M2  s2  +  Ml  s  +  MO 
B(s)  =  B4  s4  +  B3  s3  +  B2  s2  +  Bl  s  +  BO 
X(s)  is  a  state  vector  of  length  MXM 
MO,  Ml,  M2,  M3,  M4  ar^  square  matrices  of  order  MXM 
u  is  a  scalar 


by  Cramer’s  method,  the  transfer  function  from  u  to  Xj  is  given  by: 


Xj(s)  det  Mj(s) 


u(s)  det  M(s) 

where  Mj(s)  is  equal  to  M(s)  with  column  j  replaced  by  B(s). 


This  old  version  of  the  command  (see  DTERM  for  new  version)  for  computing  the  determinant 
of  a  matrix  does  not  have  the  capability  for  automatically  substituting  an  input  column  vector  to 
define  the  matrix  Mj(s).  The  user  must  enter  and  restore  each  element  of  the  matrix  M(s)  to  form 
the  desired  Mj(s)  for  each  determinant  operation. 

The  parameters  used  by  DETRM  are  in  common  block  MATRIXl  described  in  the  following  table. 


COMMON/MATRIXl/  parameters  used 

parameter 

preset 

description 

MXM 

1 

Order  of  matrices  (l-MXMAT) 

MDEG 

0 

Highest  degree  of  polynomial  element  (0-4) 

MO 

0 

Matrix  for  coefficients  of  s° 

.......  -  .  _ 

Ml 

0 

Matrix  for  coefficients  of  s1 

M2 

0 

Matrix  for  coefficients  of  s2 

M3 

0 

Matrix  for  coefficients  of  s3 

M4 

0 

Matrix  for  coefficients  of  s4 

MXMAT  =  30  for  regular  version  of  LCAP2,  MXMAT  =  50  for  large 
model  version  on  the  CRAY 


FORTRAN  CALL  [CALL  DETRM(  i  )J 

where,  i  =  index  of  polynomial  POLY;  for  storing  the  determinant 

Example  1:  Evaluate  the  SISO  transfer  function  of  a  set  of  Laplace  transformed  differential 

equations  described  by  the  matrix  M(s)  and  the  input  vector  B(s)  from  input  u 
to  output  X3  and  store  into  SPTF5.  Arbitrarily  use  POLYi  and  POLY2  to  tem¬ 
porarily  store  the  numerator  and  denominator  of  the  desired  transfer  function, 
then  copy  them  into  SPTF5.  The  FORTRAN  code  can  be  written  as: 

load  in  data  for  M(s) 

CALL  DETRH(l) 


enter  input,  vector  into  column  3  of  M(s) 


CALL  DETRMC2) 


restore  column  3  of  M(s) 


CALL  CPYPS(5,1,2) 


PRECMP  DIRECTIVE 


*DETRM  i  {  mxm  mdeg  } 


produces  the  following  FORTRAN  statements 

MXM=mxm  "if  1st  optional  argument  is  used" 

MDEG=mdeg  "if  2nd  optional  argument  is  used" 

CALL  DETRM(i) 


Example  2:  *DETRM  3 


produces  the  following  FORTRAN  statement 
CALL  DETRH(3) 

METHOD  The  determinant  is  found  by  solving  for  its  roots  directly  and  then  computing  its 
coefficients.  See  Section  C.1.2. 

Since  this  old  version  of  the  polynomial  determinant  command  does  not  automatically  insert  the 
input  column  vector  into  an  appropriate  vector  of  M(s),  extra  care  must  be  used  to  ensure  that 
the  columns  of  M(s)  are  properly  restored  after  each  call  to  DETRM. 
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RESTRICTIONS  The  order  of  the  matrices  must  not  be  greater  than  MXMAT  and  tbe  com¬ 
puted  determinant  must  not  be  greater  than  MXPDEG.  (MXMAT  =  30  and  MXPDEG  -  49  for 
normal  version  of  LCAP2,  MXMAT  =  50  and  MXPDEG  =  100  for  large  model  version  of  LCAP2). 

COMMENTS  For  new  analysis,  this  old  version  of  the  polynomial  determinant  command  should 
no  longer  be  used.  DETRM  is  still  supported  for  compatibility  with  previous  versions  of  LCAP2. 
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DTERM 


DTERM 


PURPOSE:  Compute  determinant  of  a  matrix  with  polynomial  elements  (new  version) 
POLY;  -  determinant  of  a  matrix  with  polynomial  elements 


Determinant  of  a  matrix  polynomial  is  used  in  evaluating  an  SISO  transfer  function  from  a  set  of 
Laplace  transformed  differential  equations.  Given  a  system  described  by: 


M(s)  y(s)  -  B(s)  u(s) 

where,  M(s)  —  M4  s4  ;  M3  s'  t  M2  s2  +  Ml  s  t  MO 
B(s)  -  B4  s4  *-  B3  s3  -  B2  s2  4.  Bl  s  f  BO 
y(s)  is  a  vector  of  length  MXM 

MO,  Ml,  M2,  M3,  M4  are  square  matrices  of  order  MXM 
BO,  Bl,  B2,  B3,  B4  are  column  vectors  of  length  MXM 
u  is  a  scalar 


by  Cramer’s  method,  the  transfer  function  from  u  to  y^  is  given  by: 


Yj(s)  det  Mj(s) 

u(s)  det  M(s) 

where  Mj(3)  is  equal  to  M(s)  with  column  j  replaced  by  B(s).  By  definition,  Mn(s)  —  M(s). 


The  parameters  used  by  DTERM  are  in  common  block  MATRIXl  described  in  the  following  table. 


COMMON/MATRIXl/  parameters  used 

parameter 

preset 

description 

MXM 

i 

Order  of  matrices  and  length  of  vectors  (l-MXMAT) 

MDEG 

0 

Highest  degree  of  polynomial  element  (0-4) 

MO 

0 

Matrix  for  coefficients  of  s° 

Ml 

0 

Matrix  for  coefficients  of  s1 

M2 

0 

Matrix  for  coefficients  of  s2 

M3 

0 

Matrix  for  coefficients  of  s3 

M4 

0 

Matrix  for  coefficients  of  s4 

BO 

0 

Input  vector  for  coefficients  of  s° 

Bl 

0 

Input  vector  for  coefficients  of  s1 

B2 

0 

Input  vector  for  coefficients  of  s2 

B3 

0 

Input  vector  for  coefficients  of  s3 

B4 

0 

Input  vector  for  coefficients  of  s'1 

MXMAT  —  30  for  regular  version  of  LCAP2,  MXMAT  =  50  for  large 
model  version  on  the  CRAY 
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FORTRAN  CALL  j  CALL  DTER\1(  i  ,  j  ) 

where,  i  =  index  of  polynomial  POLY;  for  storing  the  determinant 
j  =  column  number  for  substituting  the  B(s)  vector 

(0  is  defined  as  no  substitution) 

Example  1:  After  loading  in  a  matrix  M(s)  and  a  vector  B(s)  using  arrays  MO,  ...,  M4  and 

vectors  BO,  ...,  B4,  evaluate  the  SISO  transfer  function  between  u  and  x3  and 
store  into  SPTF5.  Arbitrarily  use  POLYJ  and  POLY2  to  temporarily  store 
the  numerator  and  denominator  of  the  desired  transfer  function,  then  copy  them 
into  SPTF5.  The  FORTRAN  code  can  be  written  as: 


CALL  DTERMCl , 3) 
CALL  DTERM(2 ,0) 
CALL  CPYPS(5 , 1,2) 


PRECMP  DIRECTIVE  j  *DTERM  i  j  {  mxm  mdeg  } 


produces  the  following  FORTRAN  statements 

MXM=mxm  "if  1st  optional  argument  is  used" 

MDEG=mdeg  "if  2nd  optional  argument  is  used" 

CALL  DTERM(i.j) 

Example  2:  *DTERM  3  12 


produces  the  following  FORTRAN  statements 

HXM=2 

CALL  DTERM(3 , 1) 

METHOD  The  determinant  is  found  by  solving  for  its  roots  directly  and  then  computing  its 
coefficients.  Although  B(s)  is  inserted  into  column  j  of  M(s)  for  computing  the  determinant  of 
M,(s),  the  matrices  MO,  Ml,  M2,  M3,  and  M4  are  not  affected.  See  Section  C.1.2. 

RESTRICTIONS  The  order  of  the  matrices  must  not  be  greater  than  MXM  AT  and  the  com¬ 
puted  determinant  must  not  be  greater  than  MXPDEG.  (MXMAT  =  30  and  MXPDEC  =  49  for 
norma!  version  of  LCAP2,  MXMAT  -  50  and  MXPDEG  =  100  for  large  model  version  of  LCAP2). 
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FREQS 


FREQS 


PURPOSE:  Compute  frequency  response  of  an  arbitrary  s  plane  transfer  function  using  a  user 
supplied  subroutine 


This  command  is  to  be  used  to  compute  the  frequency  response  of  an  s  plane  transfer  function 
which  cannot  be  represented  by  an  SPTF;  transfer  function  (i.e.,  a  nonrational  function,  a  transfer 
function  whose  order  exceeds  MXPDEG,  or  a  transfer  function  represented  as  a  ratio  of  polynomial 
determinants).  FREQS  is  a  generalized  frequency  response  command  which  requires  a  user-supplied 
COMPLEX  FUNCTION  defining  the  transfer  function. 

The  frequency  and  plot  parameters  used  by  FREQS  are  in  common  block  DBASE.  They  are  the 
same  ones  used  by  command  SFREQ.  (See  reference  on  SFREQ) 


FORTRAN  CALL  [CALL  FREQS(FAUXl) 

where,  FAUXl  is  the  name  of  a  user  supplied  subroutine.  FAUXl  must  be  de¬ 
clared  with  an  EXTERNAL  statement  in  the  calling  routine. 

PRECMP  DIRECTIVE  [  none  | 

COMMENTS  See  Example  16  in  Chapter  9. 
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FREQW 


FREQW 


PURPOSE:  Compute  frequency  response  of  an  arbitrary  w  plane  transfer  function  using  a  user 
supplied  subroutine 


This  command  is  to  be  used  to  compute  the  frequency  response  of  a  w  plane  transfer  function  which 
cannot  be  represented  by  an  WPTF;  transfer  function  (i.e.,  a  nonrational  function,  a  transfer 
function  whose  order  exceeds  MXPDEG,  a  transfer  function  which  is  a  function  of  several  different 
sampling  rates,  or  a  hybrid  s  and  w  transfer  function).  FREQW  is  a  generalized  frequency  response 
command  which  requires  a  user-supplied  COMPLEX  FUNCTION  defining  the  transfer  function. 

The  frequency  and  plot  parameters  used  by  FREQW  are  in  common  block  DBASE.  They  are  the 
same  ones  used  by  command  WFREQ.  (See  reference  on  WFREQ) 


FORTRAN  CALL 


CALL  FREQW(FAUXl) 


where,  FAUX  I  is  the  name  of  a  user  supplied  subroutine.  FAUXl  must  be  de¬ 
clared  with  an  EXTERNAL  statement  in  the  calling  routine. 


PRECMP  DIRECTIVE  [  none  | 
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FREQZ 


PURPOSE:  Compute  frequency  response  of  an  arbitrary  z  plane  transfer  function  using  a  user 
supplied  subroutine 

This  command  is  to  be  used  to  compute  the  frequency  response  of  a  z  plane  transfer  function 
which  cannot  be  represented  by  an  ZPTF;  transfer  function  (i.e.,  a  nonrational  function,  a  transfer 
function  which  is  a  function  of  several  different  sampling  rates,  or  a  hybrid  s  and  z  transfer  function). 
FREQZ  is  a  generalized  frequency  response  command  which  requires  a  user-supplied  COMPLEX 
FUNCTION  defining  the  transfer  function. 

The  parameters  used  by  FREQZ  are  in  common  block  DBASE.  They  are  the  same  ones  used  by 
command  ZFREQ.  (See  reference  on  ZFREQ) 

FORTRAN  CALL  I  CALL  FREQZ(FAUXl) 

where,  FAUXl  is  the  name  of  a  user  supplied  subroutine.  FAUXl  must  be  de¬ 
clared  with  an  EXTERNAL  statement  in  the  calling  routine. 

PRECMP  DIRECTIVE  f  none  I 
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LOAD 


LOAD 


PURPOSE:  Load  polynomials,  transfer  functions  and  matrix  data  for  a  restart 


This  command  allows  data  previously  saved  by  the  SAVE  command  in  either  a  batch  job  or  an 
interactive  job  to  be  reloaded. 


FORTRAN  CALL 


CALL  LO  AD(file_nnme,  iprn  ) 


where,  file_name  is  a  local  file  name  (.LE.7  characters) 

(The  local  file  name  must  be  attached  before  execution  of  a  batch  job) 
iprn  .NE.O  for  printout  of  restored  data 

Example  1:  Load  all  polynomial,  transfer  functions,  and  matrix  data  from  a  local  file 

’OLDDATA’  and  print  out  the  data.  The  FORTRAN  code  can  be  written  as: 


CALL  L0AD( ’OLDDATA’ ,1) 


PRECMP  DIRECTIVE 


♦  LOAD  file  .name  iprn 


produces  the  following  FORTRAN  statement 
CALL  LOAD(file_name,iprn) 

Example  2:  *L0AD  'OLDDATA'  1 


produces  the  following  FORTRAN  statement 
CALL  LOADC OLDDATA \1) 
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PADD 


PADD 


PURPOSE:  Polynomial  add 

POLYi  =  POLYj  +  POLYk 


FORTRAN  CALL 


CALL  PADD(  i  ,  j  ,  k  ) 


Example  1:  Add  POLY4  to  POLY2  and  store  into  POLY3.  The  FORTRAN  code  can  be 

written  as: 


CALL  PADD(3,4,2) 


PRECMP  DIRECTIVE 


*PADD  i  j  k 


produces  the  following  FORTRAN  statement 


CALL  PADD(i.j.k) 


Example  2:  *PADD  3  4  2 


produces  the  following  FORTRAN  statement 
CALL  PADD(3,4,2) 

METHOD  After  summing  the  coefficients  of  POLYj  and  POLYk  a  test  is  made  to  determine 
if  there  are  negligible  high  order  coefficients.  If  there  are,  they  will  be  set  to  zero  and  the  order  of 
the  polynomial  reduced.  The  criteria  for  determining  a  negligible  coefficient  is  EPADl  in  common 
block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

EPADl 

l.E-10 

Criteria  for  determining  a  negligible  high  order 
coefficient  after  a  polynomial  addition 
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PDEL 


PDEL 


PURPOSE:  Polynomial  delete 

Deletes  polynomial  POLY;  from  the  current  list  of  polynomial  arrays  in  use 


FORTRAN  CALL 


CALL  PDEL(  i  ) 


Example:  Delete  POLY3  from  the  current  list  of  polynomial  arrays  in  use.  The  FORTRAN 

code  can  be  written  as: 


CALL  PDEL(3) 


PRECMP  DIRECTIVE 


*PDEL  i 


produces  the  following  FORTRAN  statement 
CALL  PDEL(i) 

COMMENTS  When  the  command  SAVE  is  invoked  all  polynomials,  transfer  functions,  and 
matrix  data  will  be  saved  to  a  file.  At  the  present  time  there  is  no  means  to  select  only  a  subset  of 
this  data  to  be  saved.  The  command  PDEL,  however,  allows  the  user  to  delete  polynomials  from 
the  current  list  of  polynomials  in  use. 


PEQU 


PEQU 


PURPOSE:  Polynomial  equal 
POLY;  =  POLYj 


FORTRAN  CALL 


CALL  PEQU(  i  ,  j  ) 


Example  1:  Equate  POLY 4  to  POLY2.  The  FORTRAN  code  can  be  written  as: 


CALL  PEQU(4,2) 


PRECMP  DIRECTIVE  *PEQU  i  j 


produces  the  following  FORTRAN  statement 
CALL  PEQU(i, j) 


Example  2:  *PEQU  3  4 


produces  the  following  FORTRAN  statement 
CALL  PEQU(3,4) 
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PLDC 


PLDC 


PURPOSE:  Load  polynomial  coefficients  into  POLYj 
POLYi  =  POLY 

To  load  coefficients  into  POLYj  ,  coefficients  must  first  be  loaded  into  the  array  POLYP.  The 
command  PLDC  copies  the  coefficients  in  POLYP  into  POLY;.  The  array  POLYP  is  in  common 
block  POLYCM  described  in  the  following  table. 


COMMON/POLYCM/  parameters  used 

parameter 

preset 

description 

POLYP 

0. 

Array  for  entering  coefficients  of  a  polynomial  for  use 
with  command  PLDC.  The  format  is: 

POLYP(l)  =  degree  (.LE.  MXPDEG) 

POLYP(2)  =  coefficient  of  **0 

POLYP(3)  =  coefficient  of  **1 

POLYP(n+l)  =  coefficient  of  **n 

FORTRAN  CALL 


CALL  PLDC(  i  ) 


Example  Is  Load  the  polynomial  s2  +  75s  4-  20  into  POLY4.  The  first  step  is  to  load  the 
coefficients  into  the  array  POLYP.  The  FORTRAN  code  can  be  written  as: 

P0LYP(1)=2 

P0LYP(2)=2O. 

P0LYP(3)=75 . 

P0LYP(4)=1 . 

CALL  PLDC (4) 


PRECMP  DIRECTIVE 


*PLDC  i 


produces  the  following  FORTRAN  statement 
CALL  PLDC(i) 


Example  2:  *PLDC  4 


produces  the  following  FORTRAN  statement 
CALL  PLDC(4) 

RESTRICTIONS  The  degree  of  the  polynomial  must  not  be  greater  than  MXPDEG.  (MXPDEG 
=  49  for  the  regular  version  of  LCAP2  and  =  100  on  the  large  model  version  on  the  CRAY). 
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PLDR 


PLDR 


PURPOSE:  Load  polynomial  roots  into  POLY; 

POLYi  =  ROOT 

To  load  roots  into  POLY;  ,  roots  must  first  be  loaded  into  the  complex  array  ROOTP.  The  com¬ 
mand  PLDR  copies  the  roots  in  ROOTP  into  POLYi-  The  complex  array  ROOTP  is  in  common 
block  ROOTCM  described  in  the  following  tabic. 


COMMON/ROOTCM/  parameters  used 

parameter 

preset 

description 

ROOTP 

0. 

Complex  array  for  entering  coefficients  of  a  polynomial 
for  use  with  command  PLDR.  The  format  is: 

ROOTP(l)  =  CMPLX(degree,gain) 

where  gain  =  low  order  nonzero  coefficient 
ROOTP(2)  =  root  number  1 

ROOTP(3)  =  root  number  2 

ROOTP(n-)-l)  =  root  number  n 

FORTRAN  CALL  |  CALL  PLDR(  i  ) 

Example  1:  Load  the  polynomial 

(GAINA)(S  +  +l)(-^  +  1) 

into  POLY4.  The  FORTRAN  code  can  be  written  as: 

ROOTP (1)=CMPLI(3. .GAIHA) 

R00TP(2)=(-1 . ,0.) 

R00TP(3)=(-2 . ,3.) 

ROOTP (4) =( -2. ,-3. ) 

CALL  PLDR(4) 

PRECMP  DIRECTIVE  |  *PLDR  i 

produces  the  following  FORTRAN  statement 
CALL  PLDR(i) 
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Example  2:  Using  Example  1  from  above,  the  following  PRECMP  directives 

*R00TP  GAINA  1.  (-2., -3.) 

*PLDR  4 

will  yield  a  set  of  FORTRAN  statements  which  will  be  functionally  equivalent 
to  those  given  in  Example  1  above.  The  FORTRAN  code  generated  by  the 
*ROOTP  PRECMP  directive  includes  calls  to  several  subroutines  which  will 
convert  various  root  formats  (i.e.  real,  (real,imag),  [zeta, omega],  and  <tau>) 
into  LCAP2  root  array  format.  Note  that  the  number  of  roots  do  not  have 
to  be  entered.  It  will  be  computed  by  the  *ROOTP  directive.  Also,  it  can 
optionally  allow  the  user  to  specify  the  high  order  coefficient  instead  of  the  low 
order  nonzero  coefficient  for  the  “gain”.  See  Reference  on  *ROOTP  in  Section 
4.2.4  and  Example  4.6  in  Chapter  4. 

RESTRICTIONS  The  degree  of  the  polynomial  must  not  be  greater  than  MXPDEG.  (MXPDEG 
=  49  for  the  regular  version  of  LCAP2  and  =  100  on  the  large  model  version  on  the  CRAY). 
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PMPY 


PMPi 


PURPOSE:  Polynomial  multiply 

POLYi  =  POLYj  *  POLYk 


FORTRAN  CALL 


CALL  PMPY(  i  ,  j  ,  k  ) 


Example  1:  Multiply  POLY4  by  POLY2  and  store  into  POLY3.  The  FORTRAN  code  can 

be  written  as: 


CALL  PMPY(3,4,2) 


PRECMP  DIRECTIVE 


*PMPY  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  PMPY(i,j,k) 


Example  2:  *PHPY  3  4  2 


produces  the  following  FORTRAN  statement 

CALL  PMPY(3,4,2) 


METHOD  If  the  roots  of  POLYj  and  POLYk  are  available  (loaded  in  or  computed  in  a  previous 
command)  the  product  is  computed  from  the  roots  instead  of  from  the  coefficients. 
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POLY 
alias:  PPRN 


POLY 
alias:  PPRN 


PURPOSE:  Print  out  polynomial  POLYi 


FORTRAN  CALL 


CALL  POLY(  i  ) 


Example  1: 


Print  out  contents  of  POLYj.  The  FORTRAN  code  can  be  written  as: 


CALL  P0LY(1) 


PRECMP  DIRECTIVE 


*POLY  i 


produces  the  following  FORTRAN  statement 
CALL  POLY(i) 


Example  2:  *P0LY  1 

produces  the  following  FORTRAN  statement 
CALL  P0LY(1) 

COMMENTS  This  command  was  called  PPRN  in  previous  versions  of  LCAP2. 
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PRTS 


PRTS 


PURPOSE:  Compute  roots  of  polynomial  POLY; 


FORTRAN  CALL 


CALL  PRTS(  i  ) 


Example  1:  Compute  the  roots  of  POLY2.  The  FORTRAN  code  can  be  written  as: 

CALL  PRTS (2) 

PRECMP  DIRECTIVE  ;*PRTS  i 


produces  the  following  FORTRAN  statement 
CALL  PRTS(i) 


Example  2:  *PRTS  2 


produces  the  following  FORTRAN  statement 
CALL  PRTS (2) 


METHODS  The  Aerospace  root  finding  routine  MULE  [8]  is  used  to  find  the  roots.  See  Section 

C.l. 
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PSUB 


PSUB 


PURPOSE:  Polynomial  subtract 

POLYi  =  POLYj  POLYk 


FORTRAN  CALL  [CALL  PSUB(  i  ,  j  ,  k  ) 

Example  1:  Subtract  POLY 4  from  POLY2  and  store  into  POLY3.  The  FORTRAN  code 

can  be  written  as: 

CALL  PSUB(3 , 2,4) 

PRECMP  DIRECTIVE  i*F^SUB  i~ j  k 

produces  the  following  FORTRAN  statement 
CALL  PSUB(i,j,k) 

Example  1:  *PSUB  3  2  4 


produces  the  following  FORTRAN  statement 
CALL  PSUB (3, 2. 4) 

METHOD  After  subtracting  the  coefficients  of  POLYk  from  the  coefficients  of  POLYj,  a  test 
is  made  to  determine  if  there  are  negligible  high  order  coefficients.  If  there  are,  they  will  be  set  to 
zero  and  the  order  of  the  polynomial  reduced.  The  criteria  for  determining  a  negligible  coefficient 
is  EPADl  in  common  block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

EPADl 

l.E-10 

Criteria  for  determining  a  negligible  high  order 
coefficient  after  a  polynomial  subtraction 
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SAVE 


SAVE 


PURPOSE:  Save  polynomials,  transfer  functions,  and  matrix  data  for  a  restart 


This  command  will  save  polynomials,  transfer  functions,  and  matrix  data  (used  by  DTERM  and 
DETRM)  for  use  in  a  subsequent  LCAP2  batch  job  or  an  interactive  LCAP2  job.  Data  in  the 
character  parameter  SAVLBL  in  common  block  HEAD  described  below  is  used  as  a  header  in  the 
stored  file. 


COMMON/HEAD/  parameters  used 

i  parameter 

preset 

description 

i  SAVLBL 

!  y  >  1 

! 

character  parameter  for  labeling  file  used  for  STORE  command 

FORTRAN  CALL 


CALL  SAVE  (file_name,  iprn  ) 


where,  filejiame  is  a  local  file  name  (.LE.7  characters) 

(The  local  file  must  be  SAVEd  (CRAY)  or  CATALOGed  (CDC)  after 

execution  of  a  batch  job) 

iprn  .NE.  0  for  printout  of  data  saved 

Example  1 :  Save  all  polynomial,  transfer  functions,  and  matrix  data  to  file  ’NEWDATA’  and 

printout  the  data.  Label  the  data  as  ’final  data,  4/88’.  The  required  FORTRAN 
code  is: 


SAVLBL= ’FINAL  DATA,  4/88’ 
CALL  SAVE( ’NEWDATA’ ,1) 


PRECMP  DIRECTIVE  |  *SAVE  filename  iprnj 

produces  the  following  FORTRAN  statement 
CALL  SAVE(f ile.name , iprn) 

Example  2:  *SAVE  ’NEWDATA’  1 


produces  the  following  FORTRAN  statement 

CALL  SAVE( ’NEWDATA’ ,1) 

COMMENTS  All  polynomial,  transfer  function,  and  matrix  data  currently  in  use  will  be  written 
to  a  local  file.  At  the  present  time  there  is  no  means  to  select  only  a  subset  of  the  data  to  be 
saved.  However,  the  commands  PDEL,  SPDEL,  ZPDEL,  and  WPDEL  can  be  used  to  delete  any 
polynomial  or  transfer  function  before  invoking  the  command  SAVE. 


A  -  71 


SELCR 


SELCR 


PURPOSE:  Eliminate  common  roots  of  s  plane  transfer  function  SPTF; 

FORTRAN  CALL  |  CALL  SELCR(  i  ) 

Example  1:  Eliminate  common  roots  of  SPTF2.  The  FORTRAN  code  can  be  written  as: 

CALL  SELCRC2) 

PRECMP  DIRECTIVE  j  ♦SELCR  i 


produces  the  following  FORTRAN  statement 
CALL  SELCR(i) 


Example  2:  *SELCR  2 


produces  the  following  FORTRAN  statement 
CALL  SELCRC2) 


METHOD  If  a  numerator  root  nrt  and  a  denominator  root  drt  are  found  such  that 
(1)  CABS(drt/nrt  -  (l.,0.))  .LT.  ECREl  for  nrt  .NE.  0.  or  (2)  CABS(drt).  LT.  ECRE2  for  nrt 
.EQ.  0.,  roots  nrt  and  drt  are  considered  to  be  common  and  will  be  eliminated  from  the  transfer 
function.  ECREl  and  ECRE2  are  in  common  block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

ECREl 

2.E-4 

Tolerance  for  eliminating  common  roots  in  subroutine  CRELIM 

ECRE2 

l.E-8 

Tolerance  for  “zero”  root  in  subroutine  CRELIM 

See  Section  C.8. 
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SFREQ 


SFREQ 


PURPOSE:  Compute  frequency  response  of  s  plane  transfer  function  SPTF; 

Two  modes  are  available  for  selecting  the  frequency  points  used  for  evaluating  the  frequency  re¬ 
sponse  of  a  transfer  function  stored  in  SPTF;.  The  automatic  mode,  selected  when  FAUTO  is 
nonzero,  allows  the  user  to  specify  up  to  20  preselected  frequencies  with  the  array  OMEGA.  In 
this  mode  the  program  will  use  all  these  preselected  points  plus  its  own  dynamically  generated 
points  to  yield  a  smooth  plot.  The  number  of  preselected  points  is  determined  by  NOMEGA.  The 
beginning  and  last  frequency  points  for  computing  the  response  are  determined  by  OMEGA(l)  and 
OMEGA(NOMEGA),  respectively. 

In  the  nonautomatic  frequency  mode  (FAUTO^O)  the  user  can  define  up  to  five  sets  of  frequencies 
to  be  used  in  computing  the  response.  Each  of  these  sets  is  specified  by  a  three  element  array 
of  the  form  FREQk(i),  i=l,3.  If  FREQk(l)=a,  FREQk(2)=b  and  FREQk(3)=c,  the  k-th  set  of 
frequencies  specified  is: 

a,  a+c,  a+2c,  ...  a+jc,  b 

where  j  is  the  largest  integer  such  that  (a+jc)  is  less  than  b.  Each  successive  FREQk  array  must 
define  an  increasing  set  of  frequencies  such  that  the  first  value  of  the  segment  is  always  larger  than 
the  last  value  of  the  preceding  segment.  When  FREQk(3)  is  not  larger  than  FREQk(l),  as  in  the 
case  with  the  preset  values  for  k  =  2, 5  ,  those  segments  will  not  be  used. 

With  either  the  automatic  or  the  nonautomatic  frequency  mode,  the  program  will  automatically 
check  for  the  gain  and  phase  crossover.  When  found,  the  program  will  iterate  until  the  exact 
crossover  frequency  is  found.  The  limit  on  the  number  of  plot  points  computed  is  1500. 

The  units  used  for  representing  transfer  functions  are  in  rad/sec.  For  frequency  response  calcula¬ 
tions,  the  frequencies  used  for  evaluating  the  response  can  either  be  in  rad/sec  or  Hz.  A  nonzero 
value  for  the  parameter  RAD  will  select  the  units  rad/sec,  while  a  zero  value  will  select  Hz. 

There  is  a  provision  to  include  a  time  delay,  e~d*,  in  cascade  with  SPTFj  when  computing  the 
frequency  response.  This  time  delay  is  specified  by  the  parameter  FDELAY. 

Bode,  Nichols,  and  Nyquist  plots  are  selected  by  the  values  of  the  flags  FBODE,  FNICO,  FNYQS, 
respectively.  The  more  commonly  used  parameters  by  SFREQ  in  common  block  DBASE  are  given 
in  the  following  table.  They  include  plot  parameters. 

If  a  Bode  plot  is  selected  and  the  user  enters  a  starting  frequency  of  0.0  instead  of  a  nonzero  value, 
the  program  will  plot  the  response  over  6  cycles  (ignoring  the  value  of  CYCLE)  with  a  starting 
value  equal  to  l.E-6*(largest  frequency  value  selected). 
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COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

FAUTO 

1 

.NE.O  for  automatic  frequency  point  selection.  Uses  NOMEGA  and 
array  OMEGA. 

.EQ.O  for  user  supplied  frequency  points.  Uses  arrays  FREQl, 

FREQ2,  ...,  FREQ5. 

NOMEGA 

2 

Number  of  preselected  frequency  points  in  array  OMEGA  for  use  in 
auto,  frequency  mode,  (range  =  2  -  20) 

OMEGA 


PMARG 

FNYQS 

NQDB 


GRAFP 

HRDCPY 

FDELAY 

DEGMN 


Array  of  preselected  frequency  points  for  auto,  frequency  mode, 
(units  determined  by  RAD) 

OMEGA(l)  =  first  frequency  point  used  in  auto,  mode 
OMEGA(2)  =  second  frequency  point  used  in  auto,  mode 
OMEG A(NOMEGA)  =  last  frequency  point  used  in  auto,  mode 


.NE.O  for  rad/sec,  otherwise  Hz 


.NE.O  for  Bode  plot 
.NE.O  for  Nichols  plot 


.NE.O  for  plotting  phase  margin  instead  of  phase  for  the  Nichols  plot 
.NE.O  for  Nyquist  plot 

.NE.O  for  hardcopy  Nyquist  plot  in  dB  when  used  with  FNYQS 


•NE.O  for  low  resolution  printer  plots 


.NE.O  for  high  resolution  electrostatic  plots 


Time  delay  (dead  time)  for  s  plane  frequency  response 


Minimum  defined  phase  in  frequency  response  (Phase  defined 


CYCLE 

0 

Number  of  log  cycles  for  Bode  plot  (0-6) 

.EQ.  0  for  automatic  selection 

FREQ  1(1) 

1. 

Starting  freq.  point  for  first  segment  of  user  specified  values 
(when  FAUTO=0).  (units  determined  by  RAD) 

I  FREQl(2) 
~FREQl(3) 


|  FREQk(l) 

I 

I 


!  FREQk(2) 


I  FREQk(3) 

I 


I  DBMAX 
j  DBMIN 

! 


FXYDEL 


FXYMIN 


End  freq.  point  for  first  segment  of  user  specified  values 

(when  FAUTO=Q). _ 

Delta  frequency  for  first  segment  of  user  specified  values 
(when  FAUTO=0). 


Starting  freq.  point  for  k-th  segment  of  user  specified  values 
(when  FAUTO  =  0).  k=2,5 


End  freq.  point  for  k-th  segment  of  user  specified  values 
(when  FAUTO=0).  k=2,5 


Delta  frequency  for  k-th  segment  of  user  specified  values 
(when  FAUTO=0).  k=2,5 


Maximum  dB  for  plotting  frequency  response 


Minimum  dB  for  plotting  frequency  response. 
(Auto,  scaling  if  DBMIN=DBMAX) 


Nyquist  plot  scale  in  units  per  inch.  (Auto  scaling  if  FXYDEL=0) 


Nyquist  plot  parameter  -  minimum  real  and  imag.  value  plotted 
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FORTRAN  CALL 


CALL  SFREQ( i ) 


Example  1: 


Example  2: 


Compute  the  frequency  response  of  SPTF3,  using  the  auto  frequency  mode  for 
frequencies  between  0.  and  1000.  and  at  1.,  10.,  and  100.  Select  printer  and 
hardcopy  Bode  and  Nichols  plots  with  auto  scaling.  The  FORTRAN  code  can 
be  written  as: 


FAUT0=1 
N0MEGA=5 
0MEGA(l)=O. 
0MEGA(2) =1 . 
OMEGA(3)=10 . 
OMEGA(4)=100 . 
OMEGA(5)=1000 . 
FB0DE=1 
FHIC0=1 
GRAFP=1 
HRDCPY=1 
CALL  SFREQ(3) 


Compute  the  frequency  response  of  SPTF3,  using  the  nonauto  frequency  mode 
for  frequencies  between  0.  and  2.  in  increments  of  .1;  between  3.  and  20.  in 
increments  of  1.;  and  between  22.  and  100.  in  increments  of  2.  Select  printer 
and  hardcopy  Bode  and  Nichols  plots  with  fixed  scaling  between  -30  and  10  for 
the  dB  axis.  The  FORTRAN  code  can  be  written  as: 

FAUT0=0 

FREQ1(1)=0. 

FREQ1(2)=2. 

FREQ1(3)= . 1 
FREQ2(1)=3. 

FREQ2(2)=20. 

FREQ2(3)=1 . 

FREQ3(1)=22 . 

FREq3(2)=100 . 

FREQ3(3)=2. 

FB0DE=1 
FNIC0=1 
DBMIS=-30 
DBMAX=10 
CALL  SFREQ(3) 
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PRECMP  DIRECTIVE 


[*SFREQ  i 


produces  the  following  FORTRAN  statement 


CALL  SFREQ(i) 


Example  3:  Using  Example  1  from  above,  the  following  code  fragment 


FAUT0=1 

N0MEGA=5 

♦OMEGA  0  1  10  100  1000 
FB0DE=1 
FNIC0=1 
GRAFP=1 
HRDCPY=1 
♦SFREQ  3 

produces  the  same  FORTRAN  statements  as  in  Example  1. 

METHOD  The  frequency  response  can  be  evaluated  by  using  either  (1)  the  coefficient  form  or 
(2)  the  root  form  (if  available)  of  SPTF;.  If  the  roots  are  available,  that  form  will  be  used  since 
the  response  can  be  computed  with  higher  accuracy.1 

If  the  automatic  frequency  mode  is  selected  (FAUTO.NE.O),  the  program  will  choose  frequency 
points  for  evaluating  the  response  such  that  successive  dB  and  phase  values  will  be  within  spec¬ 
ified  limits  to  yield  a  smooth  plot.  The  program  evaluates  the  first  point  using  f  =  OMEGA(l). 
Then  choosing  deltaf  —  OMEGA(1)/20  initially,  the  next  frequency  to  be  used  is  computed  as 
f  =f  +  deltaf.  Evaluating  the  response  using  this  value  of  f,  the  delta  dB  and  phase  are  compared 
to  the  specified  limits.  If  either  is  too  large,  deltaf  is  halved  and  the  response  is  recomputed.  If  both 
are  too  small,  deltaf  is  doubled  and  the  response  is  recomputed.  The  limits  for  delta  dB  are  EDBl/2 
and  EDBl.  The  limits  for  delta  phase  is  EDEGl/2  and  EDEGl.  Simultaneously  with  computing 
the  next  f  be  to  used  in  evaluating  the  response,  a  comparison  is  made  with  the  next  value  of 
OMEGA(i).  If  f  is  larger  than  OMEGA(i),  f  will  be  replaced  with  the  value  of  OMEGA(i).  This 
will  ensure  that  the  user’s  prespecified  frequency  points  will  be  used.  This  procedure  will  continue 
until  the  last  value  of  OMEGA(NOMEGA)  is  used.  There  is  a  limit  on  the  number  of  iterations 
in  computing  the  frequency  points.  This  limit  can  be  changed  by  the  parameter  MAXITF. 

If  a  frequency  point  being  used  to  evaluate  the  response  is  equal  to  a  pole  on  the  ju>,  the  warning 
message 


ZERO  IN  DENOMINATOR  AT  OMEGA  =  ,  THIS  POINT  SKIPPED 


will  be  printed  out  and  the  program  allowed  to  continue.  If  this  situation  occurs  when  the  automatic 

'Also,  for  very  high  order  transfer  functions,  the  following  problems  will  be  avoided:  (!)  Premature  overflow 
of  the  numerator  or  denominator  terms  if  the  coefficients  are  scaled  by  a  very  large  number.  (This  can  occur  if  a 
large  number  of  block  diagram  reduction  operations  were  used  to  compute  SPTFj.  For  this  situation,  though,  the 
command  SNORM  can  be  used  to  normalize  the  coefficients.)  and  (2)  Inherently  less  accurate  representation  of  the 
coefficients  in  a  finite  machine  (the  coefficients  are  functions  of  terms  involving  products  of  the  roots)  will  become 
pronounced  as  the  order  of  the  transfer  function  is  increased. 
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frequency  mode  is  selected  and  OMEGA(l)=0.  (i.e.,  when  the  transfer  function  has  a  pole  at  the 
origin),  the  program  will  be  restarted  with  the  first  frequency  point  at  OMEGA(2)/10001  instead. 

Also  as  part  of  the  automatic  frequency  mode,  a  comparison  is  made  on  deltaf  to  keep  deltaf/f 
within  the  limits  of  MINDW  and  MAXDW.  The  lower  limit  MINDW  is  necessary  to  prevent  an 
excessive  number  of  plot  points  around  frequencies  with  very  low  damping  coefficients.  The  upper 
limit  MAXDW  will  ensure  that  there  are  enough  points  to  yield  a  smooth  Bode  plot. 

Since  the  plot  points  computed  to  generate  a  smooth  plot  will,  in  many  cases,  be  very  large,  only 
a  portion  of  the  computed  response  will  be  printed  out.  The  printout  is  controlled  by  the  delta  dB 
and  delta  phase  parameters,  EDB2  and  EDEG2,  respectively.  A  tabular  printout  is  made  only  if 
either  of  these  limits  are  exceeded. 

Capability  exists  for  creating  multiple  plots  on  the  high  resolution  electrostatic  printer  by  setting 
the  appropriate  value  for  the  parameter  CONTP.  See  Section  E.3  for  the  details. 

The  following  table  lists  additional  parameters  in  the  common  block  DBASE  which  the  user  can 
change. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

CONTP 

0 

=0  Single  curve  plot 
=  1  First  curve  of  a  plot 
=2  Continuation  of  a  plot 
=3  Final  curve  of  a  plot 

EDB1 

1. 

Min.  delta  dB  for  plotting 

EDB2 

2. 

Min.  delta  dB  for  printout 

EDEGl 

4. 

Max.  delta  degree  for  plotting 

EDEG2 

10. 

Max.  delta  degree  of  printout 

MINDW 

.0005 

Min.  relative  frequency  step  size 

MAXDW 

.2 

Max.  relative  frequency  step  size 

MAXITF 

3000 

Max.  number  of  iterations  allowed 

'This  will  allow  a  nonzero  deltaf  =  (OMEGA(2)/1000)/20  to  be  used  instead  of  OMEGA(1)/20  for  initialising 
the  variable  frequency  step  size. 
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SLOCI 


SLOCI 


PURPOSE:  Compute  root  loci  of  s  plane  transfer  function  SPTF; 


Root  locus  of  an  open  loop  transfer  function  SPTF;  is  computed  by  varying  the  loop  gain.  The 
gains  to  be  used  by  SLOCI  are  multipliers  of  SPTF;.  Thus,  the  gains  should  begin  at  a  value 
less  than  1.0  and  end  at  a  value  greater  than  1.0  if  the  loci  is  to  bracket  the  nominal  operating 
gain  of  the  system.  Up  to  25  preselected  gains  for  evaluating  the  root  loci  can  be  specified  with 
array  KGAIN.  The  number  of  preselected  gains  is  determined  by  NLOCI.  The  beginning  and  last 
gains  are  determined  bv  KGAIN(ll  and  KGAIN(NLOCI),  respectively.  Additional  gains  can  be 
automatically  computed  by  the  program  to  fill  in  values  between  the  preselected  gains.  Between 
KGAIN(i)  and  KGAIN(i-f  1),  additional  gains  will  be  selected  by  either  of  the  following  two  methods 
if  they  are  between  KGAIN(i)  and  KGAIN(i+l). 

If  KFLG.EQ.O,  gain  =  KGAIN(i)  +  KDELT*j,  j=l,2,  ... 

If  KFLG.NE.O,  gain  =  KGAIN(i)*KDELT**j,  j=l,2,  ... 

For  example,  if  KGAIN(2)=10,  KGAIN(3)=100,  KFLG=1,  and  KDELT=2,  the  following  gains 
will  be  used  to  compute  the  root  loci: 

.  .  .  10.,  20.,  40.,  80.,  100.,  .  .  . 

The  total  number  of  gains  used  is  limited  by  the  value  of  the  parameter  ITLOC  which  is  preset  to 
50.  Parameters  used  by  SLOCI  are  given  in  the  following  table. 
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COMMON/DBASE/  parameters  used 


parameter  preset 

description 

NLOC1  2 

Number  of  root  locus  gains  entered  in  array  KGAIN  (max  =  25) 

KG  AIN 

Array  of  root  locus  gains 

.5 

KGAIN(l)  =  first  user-specified  root  locus  gain 

2. 

KGAIN(2)  =  second  user-specified  root  locus  gain 

KGAIN(NLOCI)  =  last  user-specified  root  locus  gain. 

(Gains  computed  and  used  only  if  they  are  between  KGAIN(l) 
and  KGAIN(NLOCI)  ) _ 


KFLG  1  .EQ.O  to  increment  gain  by  multiplying  by  KDELT 

.NE.O  to  increment  gain  by  adding  by  KDELT 
KDELT  1.E4  Value  for  changing  gains  (preset  to  large  value  so  that  no  add¬ 

itional  gains  are  computed). 

ITLOC  50  Max.  number  of  different  gains  computed 

GRAFP  1  .NE.O  for  low  resolution  printer  plots 

HRDCPY  0  .NE.O  for  high  resolution  electrostatic  plots 

RLXMIN  0.  Min.  x  axis  for  plotting 

RLXMAX  0.  Max.  x  axis  for  plotting 

_ (Auto,  scaling  if  RLXMIN=RLXMAX) _ 

RLYMIN  0.  Min.  y  axis  for  plotting 

RLYMAX  0.  Max.  y  axis  for  plotting 

_ (Auto,  scaling  if  RLYMIN = RLYMAX) _ 

RLFLGl  1  Flag  for  numbering  root  locus  points  on  hardcopy  plots 

.EQ.l  for  numbering;  .EQ.-l  for  no  numbering 


FORTRAN  CALL 


CALL  SLOCI(  i  ) 


Example  1:  Compute  the  root  locus  of  SPTF2  by  varying  the  gain  from  .5  to  20  by  doubling 

the  first  gain  until  the  last  gain  is  reached.  Select  printer  and  hardcopy  plots 
with  auto  scaling.  The  FORTRAN  code  can  be  written  as: 


NL0CI=2 

KGAIN(1)=.5 

KGAIK(2)=20. 

KFLG=0 

KDELT=2 

GRAFP=1 

HRDCPY=1 

CALL  SL0CI(2) 


PRECMP  DIRECTIVE 


♦SLOCI  i 


produces  the  following  FORTRAN  statement 


CALL  SLOCI(I) 


Example  2:  Using  Example  1  from  above,  the  following  code  fragment 

UL0CI=2 
♦KGAIN  .5  20. 

KFLG=0 
KDELT=2 
GRAFP=1 
HRDCPY=1 
♦SLOCI  2 


produces  the  following  FORTRAN  statements 


NL0CI=2 . 
KGAIN(1)=.5 
KGAIS(2)=20 . 
KFLG=0 . 
KDELT=2 . 
GRAFP=1 . 
HRDCPY=1 . 

CALL  SL0CIC2) 


METHOD  Root  locus  is  computed  by  evaluating  the  roots  of  the  polynomial  (  PN  +  k*PD  ) 
where  k  is  the  gain  to  be  varied  and  PN  and  PD  are  the  numerator  and  denominator  polynomials 
of  the  transfer  function.  For  a  more  general  root  locus  where  the  gain  to  be  varied  is  not  the  loop 
gain,  see  command  BILOCI. 
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SNORM 


SNORM 


PURPOSE;  Normalize  coefficients  of  s  plane  transfer  function  SPTFj 


Normalization  can  be  either  with  respect  to  the  low  order  nonzero  coefficient  or  the  high  order 
coefficient  of  the  denominator.  The  parameter  NRMHI  determines  which  method  is  to  be  used. 

If  NRMHI  is  equal  to  zero,  the  low  order  nonzero  coefficient  of  the  denominator  is  set  equal  to  the 
parameter  KNORM  and  all  other  coefficients  are  normalized  to  this  value.  If  KNORM  =  1.,  the 
low  order  nonzero  coefficient  of  the  numerator  is  the  Bode  gain. 

If  NRMHI  is  not  equal  to  zero,  the  high  order  coefficient  of  the  denominator  is  set  equal  to  the 
parameter  KNORM  and  all  other  coefficients  are  normalized  to  this  value.  If  KNORM  =1.,  the 
high  order  coefficient  of  the  numerator  is  the  root  locus  gain.  Parameters  used  by  SNORM  are 
given  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

KNORM 

1. 

Value  used  for  normalizing  the  transfer  function 

NRMHI 

0 

.EQ.O  for  normalizing  to  the  low  order  nonzero  coefficient 
.NE.O  for  normalizing  to  the  high  order  coefficient 

FORTRAN  CALL 


CALL  SNORM(  i  ) 


Example  1:  If  the  s  plane  transfer  function 


s  +  14 

2s2  +  7s  +78 

stored  in  SPTFj  ,  is  to  be  normalized  so  that  the  low  order  denominator  coeffi¬ 
cient  is  1.0  (so  that  the  Bode  gain  appears  explicitly  as  the  low  order  numerator 
coefficient),  the  FORTRAN  code  can  be  written  as: 


NRMHI=0 
KN0RM=1 . 

CALL  SNORM(l) 


PRECMP  DIRECTIVE 


♦  SNORM  i  {  nrmhi  knorm  } 


produces  the  following  FORTRAN  statements 

HRMHI=nrmhi  "if  1st  optional  argument  is  used" 

KN0RM=knorm  "if  2nd  optional  argument  is  used" 

CALL  SHORM(i) 
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Example: 


♦SNORM  102 


produces  the  following  FORTRAN  statement 

HRMHI=0 
KN0RH=2 
CALL  SUORM(l) 

COMMENTS  When  the  block  diagram  reduction  method  is  used,  the  resulting  transfer  function 
of  interest  may  have  its  numerator  and  denominator  coefficients  scaled  by  a  very  large  number  if 
the  system  order  is  very  high.  This  may  lead  to  an  unnecessary  overflow  in  a  subsequent  frequency 
response  evaluation  since  either  or  both  the  numerator  and  denominator  terms  may  overflow  while 
the  ratio  (numerator  term/ denominator  term)  is  within  the  range  of  the  computer.  Command 
SNORM  can  be  used  to  scale  the  coefficients  so  that  this  type  of  overflow  can  be  prevented. 
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SPADD 


SPADD 


PURPOSE:  S  plane  transfer  function  add 

SPTFi  =  SPTFj  +  SPTF;, 

FORTRAN  CALL  [CALL  SPADD(  i  ,  j  ,  k  )  ] 

Example:  Add  SPTF  4  to  SPTF2  and  store  into  SPTF^  The  FORTRAN  code  can  he  writ  ten 

3.S  I 

CALL  SPADD(3,4,2) 

PRECMP  DIRECTIVE  [*SPADD  i  j  lT~] 

,  produces  the  following  FORTRAN  statement 
CALL  SPADD(i , j ,k) 

Example:  *SPADD  3  4  2 


produces  the  following  FORTRAN  statement 
CALL  SPADD(3,4,2) 

COMMENTS  If  the  roots  of  both  SPTFj  and  SPTF^  are  available  (loaded  in  or  computed  from 
a  previous  command)  any  common  roots  between  the  denominators  will  be  factored  out  before  the 
sum  is  computed. 
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SPCLSLP 


SPCLSLP 


PURPOSE:  S  plane  closed  loop  transfer  function 

SPTFj  =  SPTFj  /  (  1  +  SPTFj*SPTFk  ) 


FORTRAN  CALL 


CALL  SPCLSLP(  i  ,  j  ,  k  ) 


Example:  Compute  closed  loop  transfer  function  SPTF4  where  SPTF2  is  the  forward  loop 
transfer  function  and  SPTF3  is  the  feedback  transfer  function.  The  FORTRAN 
code  can  be  written  as: 


CALL  SPCLSLP(4,2,3) 


PRECMP  DIRECTIVE 


♦  SPCLSLP  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  SPCLSLP(i.j.k) 


Example:  *SPCLSLP  4  2  3 


produces  the  following  FORTRAN  statement 
CALL  SPCLSLP(4,2,3) 
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SPDEL 


SPDEL 


PURPOSE:  S  plane  transfer  function  delete 

Deletes  transfer  function  SPTF;  from  the  current  list  of  transfer  function  arrays  in  use 

FORTRAN  CALL  I  CALL  SPDEL(  i  )  ] 

Example:  Delete  SPTF3  from  the  current  list  of  transfer  function  arrays  in  use.  The 

FORTRAN  code  can  be  written  as: 

CALL  SPDEL(3) 


PRECMP  DIRECTIVE 


produces  the  following  FORTRAN  statement 


CALL  SPDEL(i) 


COMMENTS  When  the  command  SAVE  is  invoked  all  polynomials,  transfer  functions,  and 
matrix  data  will  be  saved  to  a  file.  At  the  present  time  there  is  no  means  to  select  only  a  subset  of 
this  data  to  be  saved.  The  command  SPDEL,  however,  allows  the  user  to  delete  s  plane  transfer 
functions  from  the  current  list  of  transfer  functions  in  use. 
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SPDIV 


SPDIV 


PURPOSE:  S  plane  transfer  function  divide 
SPTFi  =  SPTFj  /  SPTFk 

FORTRAN  CALL  CALL  SPDIV(  i  ,  j  ,  k  )' 

Example:  Divide  SPTF4  by  SPTF2  and  store  into  SPTF3.  The  FORTRAN  code  can  be 
written  as: 

CALL  SPDIV(3,4,2) 

PRECMP  DIRECTIVE  |  *SPDIV  i  j~k~ 

produces  the  following  FORTRAN  statement 

CALL  SPDIVfi, j ,k) 

Example:  *SPDIV  3  4  2 

produces  the  following  FORTRAN  statement 
CALL  SPDIV(3,4,2) 

METHOD  If  the  roots  of  SPTFj  and  SPTFk  are  available  (loaded  in  or  computed  in  a  previous 
command)  the  quotient  is  computed  from  the  roots  instead  of  from  the  coefficients. 
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SPEQU 


SPEQU 


PURPOSE:  S  plane  transfer  function  equal 

SPTFi  =  SPTFj 


FORTRAN  CALL 


CALL  SPEQU(  i  ,  j  T~ 


Example:  Equate  SPTF4  to  SPTF2-  The  FORTRAN  code  can  be  written  as: 


CALL  SPEQU(4,2) 


PRECMP  DIRECTIVE 


♦  SPEQU  i  j 


produces  the  following  FORTRAN  statement 


CALL  SPEQU(i.j) 


Example:  *SPEQU  4  2 


produces  the  following  FORTRAN  statement 
CALL  SPEQUC4.2) 
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SPLDC 


SPLDC 


PURPOSE:  Load  transfer  function  coefficients  into  SPTF; 
SPTFi  =  POLYN  /  POLYD 


To  load  coefficients  into  SPTF;  ,  coefficients  must  first  be  loaded  into  the  arrays  POLYN  and 
POLYD.  The  command  SPLDC  copies  the  coefficients  in  POLYN  and  POLYD  into  SPTFi.  The 
arrays  POLYN  and  POLYD  are  in  common  block  POLYCM  described  in  the  following  table: 


COMMON/POLYCM/  parameters  used 

parameter 

preset 

description 

POLYN 

0. 

Array  for  entering  coefficients  of  a  numerator  polynomial 

for  use  with  command  SPLDC,  WPLDC,  ZPLDC.  The  format  is: 

POLYN(l)  =  degree  (.LE.  MXPDEG) 

POLYN(2)  =  coefficient  of  **0 

POLYN(3)  =  coefficient  of  **1 

POLYN(n+l)  =  coefficient  of  **n 

POLYD 

0. 

Array  for  entering  coefficients  of  a  denominator  polynomial 
for  use  with  command  SPLDC,  WPLDC,  ZPLDC.  The  format  is: 
POLYD(l)  =  degree  (.LE.  MXPDEG) 

POLYD(2)  =  coefficient  of  **0 

POLYD(3)  =  coefficient  of  **1 

POLYD(n+l)  =  coefficient  of  **n 

FORTRAN  CALL 


CALL  SPLDC(  i  ) 


Example  1:  Load  the  transfer  function 


8s  "1"  3 

17s2  +  6s  +  11 

into  SPTF4.  The  first  step  is  to  load  the  numerator  and  denominator  into 
POLYN  and  POLYD,  respectively.  The  FORTRAN  code  can  be  written  as: 


P0LYN(1)=1 

P0LY1T(2)=3 

P0LYH(3)=8 

P0LYD(1)=2 

P0LYD(2)=11 

P0LYD(3)=6 

P0LYD(4)=17 

CALL  SPLDC (4) 
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PRECMP  DIRECTIVE 


*SPLDC  i 


produces  the  following  FORTRAN  statement 
CALL  SPLDC(i) 

Example  2:  Using  Example  1  from  above,  the  following  PRECMP  directives 

♦POLYS  138 
♦POLYD  2  11  6  17 
♦SPLDC  4 

produces  the  same  FORTRAN  code  given  in  Example  1.  See  Section  4.2.4  for 
definition  of  the  *POLYN  and  *POLYD  directives. 

RESTRICTIONS  The  degree  of  the  numerator  and  denominator  must  be  .LE.MXPDEG. 
(MXPDEG  =  49  for  the  regular  version  of  LCAP2,  —  100  for  large  model  version  on  the  CRAY). 


A  -  89 


SPLDR 


SPLDR 


PURPOSE:  Load  transfer  function  roots  into  SPTF; 

SPTFi  =  ROOTN  /  ROOTD 

To  load  roots  into  SPTF;  ,  coefficients  must  first  be  loaded  into  the  arrays  ROOTN  and  ROOTD. 
The  command  SPLDR  copies  the  coefficients  in  ROOTN  and  ROOTD  into  SPTF;.  The  complex 
arrays  ROOTN  and  ROOTD  are  in  common  block  ROOTCM  described  in  the  following  table: 


COMMON/ROOTCM/  parameters  used 

parameter 

preset 

description 

ROOTN 

0. 

Complex  array  for  entering  numerator  roots  into  a  transfer 
function  for  use  with  commands  SPLDC,  WPLDC,  or  ZPLDC. 
The  format  is: 

ROOTN(l)  =  CMPLX(degree,gainn) 

where  gainn  =  low  order  nonzero  numerator  coefficient 
ROOTN(2)  =  numerator  root  number  1 

ROOTN(3)  =  numerator  root  number  2 

ROOTN(n+l)  =  numerator  root  number  n 

ROOTD 

0. 

Complex  array  for  entering  numerator  roots  into  a  transfer 
function  for  use  with  commands  SPLDC,  WPLDC,  or  ZPLDC. 
The  format  is: 

ROOTD(l)  =  CMPLX(degree,gaind) 

where  gaind  =  low  order  nonzero  denominator  coefficient 
ROOTD(2)  =  denominator  root  number  1 

ROOTD(3)  =  denominator  root  number  2 

ROOTD(n+l)  =  denominator  root  number  n 

FORTRAN  CALL 


CALL  SPLDR(  i  ) 


Example  1:  Load  the  transfer  function 


50(1+1) 

7(?  +  1 )( 3^j5  +  1 )( a+Js  +  l) 


into  SPTF2  .  The  first  step  is  to  load  the  numerator  and  denominator  into  the 
complex  arrays  ROOTN  and  ROOTD,  respectively.  The  FORTRAN  code  can 
be  written  as: 


R00TN(i)=(i. ,50.) 
R00TN(2)=(-2.  ,0.) 
R0QTD(1)=(3. ,7.) 
R00TD(2)=(-4. ,0.) 
ROOTD (3) =(-3 . ,5 . ) 
ROOTD (4) = (-3 . ,-5 . ) 
CALL  SPLDR(2) 


PRECMP  DIRECTIVE 


*SPLDR  i 


produces  the  following  FORTRAN  statement 
CALL  SPLDR(i) 

Example  2:  Using  Example  1  from  above,  the  following  PRECMP  directives 

♦R00TU  50.  -2 
♦ROOTD  7  -4  (-3. ,5.) 

♦SPLDR  2 

will  yield  a  set  of  FORTRAN  statements  which  will  be  functionally  equivalent 
to  those  given  in  Example  1  above.  The  FORTRAN  code  generated  by  the 
♦ROOTN  and  ♦ROOTD  PRECMP  directives  includes  calls  to  several  subrou¬ 
tines  which  will  convert  various  root  formats  (i.e.  real,  (real,imag),  [zeta, omega], 
and  <tau>)  into  LCAP2  root  array  format.  Note  that  the  number  of  roots  does 
not  have  to  be  entered.  It  will  be  computed  by  the  *ROOTN  and  *ROOTD  direc¬ 
tives.  Also,  it  can  optionally  allow  the  user  to  specify  the  high  order  coefficients 
instead  of  the  low  order  nonzero  coefficients  for  the  numerator  and  denominator 
“gains”.  See  Section  4.2.4  for  description  of  ♦ROOTN  and  ♦ROOTD. 

RESTRICTIONS  The  degree  of  the  numerator  and  denominator  must  be  .LE.  MXPDEG. 
(MXPDEG  =  49  for  the  regular  version  of  LCAP2,  =  100  for  the  large  order  model  on  the  CRAY). 


SPMPY 


SPMPY 


PURPOSE:  S  plane  transfer  function  multiply 
SPTFj  =  SPTFj  *  SPTFk 

FORTRAN  CALL  CALL  SPMPY(  i  ,  j  ,  k  j~ 

Example:  Multiply  SPTF4  and  SPTF2  and  store  into  SPTF3.  The  FORTRAN  code  can  be 
written  as: 

CALL  SPMPY (3, 4, 2) 

PRECMP  DIRECTIVE  |  *SPMPY  i  j  k 

produces  the  following  FORTRAN  statement 
CALL  SPMPY(i.j.k) 

Example:  *SPMPY  3  4  2 

produces  the  following  FORTRAN  statement 
CALL  SPMPY(3,4,2) 

METHOD  If  the  roots  of  SPTFj  and  SPTFk  are  available  (loaded  in  or  computed  in  a  previous 
command)  the  product  is  computed  from  the  roots  instead  of  from  the  coefficients. 
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SPTF 

alias:  SPPRN 


SPTF 
alias:  SPPRN 


PURPOSE:  Print  out  s  plane  transfer  function  SPTF; 


FORTRAN  CALL 


CALL  SPTF(  i  ) 


Example:  Print  out  contents  of  SPTFi.  The  FORTRAN  code  can  be  written  as: 
CALL  SPTF(l) 


PRECMP  DIRECTIVE 


*SPTF  i 


produces  the  following  FORTRAN  statement 
CALL  SPTF(i) 


Example:  *SPPRN  1 


produces  the  following  FORTRAN  statement 

CALL  SPPRS(l) 

COMMENTS  This  command  was  called  SPPRN  in  previous  versions  of  LCAP2. 
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SPRTS 


SPRTS 


PURPOSE:  Compute  roots  of  s  plane  transfer  function  SPTF; 

FORTRAN  CALL  |  CALL  SPRTS(  i  ) 

Example  1?  Compute  the  roots  of  SPTFo.  The  FORTRAN  code  -an  be  written  as: 

CALL  SPRTS (2) 

PRECMP  DIRECTIVE  |  *SPRTS  i 

produces  the  following  FORTRAN  statement 
CALL  SPRTS (i) 

Example  2:  *SPRTS  2 

produces  the  following  FORTRAN  statement 
CALL  SPRTS (2) 

METHOD  The  Aerospace  root  finding  MULE  [8]  routine  is  used  to  find  the  roots.  See  Section 

C.l. 
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SPSUB 


SPSUB 


PURPOSE:  S  plane  transfer  function  subtract 
SPTFj  =  SPTFj  -  SPTFj, 

FORTRAN  CALL  |  CALL  SPSUB(  i  .  i  .  k  1  I 


Example:  Subtract  SPTF4  from  SPTF2  and  store  into  SPTF3.  The  FORTRAN  code  can  be 
written  as: 

CALL  SPSUB (3 ,2. 4) 


PRECMP  DIRECTIVE 


♦  SPSUB  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  SPSUB(i.j.k) 


Example:  *SPSUB  3  2  4 


produces  the  following  FORTRAN  statement 

CALL  SPSUB(3 ,2,4) 

COMMENTS  If  the  roots  of  both  SPTFj  and  SPTFj,  are  available  (loaded  in  or  computed  from 
a  previous  command)  any  common  roots  between  the  denominators  will  be  factored  out  before  the 
difference  is  computed. 
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STIME 


STIME 


PURPOSE:  Inverse  Laplace  transform  and  time  response  of  s  plane  transfer  function  SPTF; 


Compute  inverse  Laplace  transform  analytically  and  evaluate  the  time  response.  The  input  can  be 
a  step  or  input  as  specified  by  the  parameter  TTYPE.  The  magnitude  is  specified  by  the  param¬ 
eter  TMAGN.  The  responre  v.  Ill  be  evaluated  from  TZERO  to  TEND  in  increments  of  TDELT. 
Since  the  response  is  evaluated  analytically,  TZERO  does  not  have  to  be  zero.  Parameters  used  by 
STIME  are  in  common  block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

TTYPE 

1 

.EQ.O  for  impulse  response;  .EQ.l  for  step  response 

TMAGN 

1. 

Magnitude  of  input 

TZERO 

0. 

Start  time  for  evaluating  time  response 

TEND 

1. 

End  time  for  evaluating  time  response 

TDELT 

1. 

Delta  time  for  evaluating  s  plane  time  response 

1 

.NE.O  for  low  resolution  printer  plots 

HRDCPY 

0 

.NE.O  for  high  resolution  electrostatic  plots 

TXMIN 

0. 

Minimum  x  axis  for  time  plot 

TXMAX 

0. 

Maximum  x  axis  for  time  plot 

(Auto  scaling  of  x  axis  if  TXMIN=TXMAX) 

TYMIN 

0. 

Minimum  y  axis  for  time  plot 

TYMAX 

0. 

Maximum  y  axis  for  time  plot 

(Auto  scaling  of  y  axis  if  TYMIN=TYMAX) 

CONTP 

0 

=0  Single  curve  plot 
=  1  First  curve  of  a  plot 
=2  Continuation  of  a  plot 
=3  Final  curve  of  a  plot 

FORTRAN  CALL 


CALL  STIME(  i  ) 


Example  1:  Compute  the  step  response  of  SPTF2  from  5  to  25  seconds  in  increments  of  0.5 

seconds.  Select  only  high  resolution  plot  with  auto  scaling.  The  FORTRAN  code 
can  be  written  as: 


TTYPE=1 
TMAGN=1 . 
TZER0=5 . 
TEHD=25 . 
TDELT= . 5 
GRAFP=0 
HRDCPY=1 
CALL  STIHEC2) 


PRECMP  DIRECTIVE 


*STIME  i  {  ttype  tmagn  tzero  tend  tdelt  }  j 


produces  the  following  FORTRAN  statements 


TTYPE=ttype 
TMAGN =tmagn 
TZERO=tzero 
TEND=tend 
TDELT=tdelt 
CALL  STIME(i) 

Example  2:  *STIME  2  1  10 


"if  1st  optional  argument  is  used" 
"if  2nd  optional  argument  is  used" 
"if  3rd  optional  argument  is  used" 
"if  4th  optional  argument  is  used" 
"if  5th  optional  argument  is  used" 


produces  the  following  FORTRAN  statements 


TTYPE=0 
TMAGN=10 
CALL  STIMEC2) 

METHOD  See  Section  C.4. 

COMMENTS  Capability  exists  for  creating  multiple  plots  on  the  high  resolution  electrostatic 
plotter  by  setting  the  appropriate  value  for  the  parameter  CONTP.  See  Section  E.3  for  the  details. 

In  previous  versions  of  LCAP2,  the  parameter  TTYPE  was  called  TSTEP. 

Restrictions  No  multiple  poles1  allowed  except  for  those  at  the  origin.  Also,  the  number  of  zeros 
must  not  exceed  the  number  of  non  zero  poles  (See  Section  C.3). 


1  If  a  system  with  multiple  poles  are  modeled  as  a  connection  of  s  plane  transfer  functions,  command  BlTIME  can 
be  used  to  evaluate  the  time  response  since  the  partial  fraction  expansion  method  is  not  used. 
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SWMRX 


SWMRX 


PURPOSE:  Compute  s  to  w  plane  slow-fast  multirate  transform  (ZOH  at  slower  sampling  rate) 
WPTF;  =  slow-fast  multirate  transform  of  SPTF; 


If  the  input  to  an  s  plane  transfer  function  is  sampled  at  a  slow  rate  and  the  output  is  sampled  at 
a  faster  (by  an  integer  multiple)  rate,  the  transfer  function  of  the  output  is  given  by: 

CT/"(zn)  =  GT/"(zn)  *  ET(z) 


where,  z  =  z  plane  variable  at  the  slow  rate 

n  —  integer  ratio  of  input /output  sampling  period 

zn  =  z  plane  variable  at  the  faster  rate 

ET(z)  =  z  plane  transform  of  the  input  at  the  slower  rate 

G(s)  =  s  plane  transfer  function  with  time  delay  and  optional  ZOH 

Gr/n(zn)  =  z  plane  transform  of  G(s)  at  the  faster  rate 

CT/,n(zn)  =  z  plane  transform  of  the  output  at  the  faster  rate 


The  equivalent  w  plane  relationship  is  given  by 


Cr/n(wn)  =  GT/"(wn)  *  Et(w) 


where,  w  =  w  plane  variable  at  the  slow  rate 

wn  =  w  plane  variable  at  the  faster  rate 

ET(w)  =  w  plane  transform  of  the  input  at  the  slower  rate 

GT/n{ 

wn)  =  w  plane  transform  of  G(s)  at  the  faster  rate 

CT/n( 

wn)  =  w  plane  transform  of  the  output  at  the  faster  rate 


The  command  SWMRX  computes  the  transform  GT/n(w„). 

GT/n(  wn)  at  the  faster  sampling  rate  could  be  computed  using  the  command  SWXFM  if  there  were 
no  slow  rate  zero  order  hold  at  the  input  to  the  plant.  If  there  is  one,  the  effects  of  the  delay  term 
of  the  zero  order  hold  must  be  correctly  accounted  for.  In  using  the  command  SWMRX,  the  faster 
sampling  rate  is  specified  by  the  parameter  SAMPT  and  the  integer  ratio  of  the  input/output  sam¬ 
pling  period  is  specified  by  NTGER.  Parameters  used  by  SWMRX  are  in  common  block  DBASE 
described  by  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

SAMPT 

1. 

Sampling  period  of  the  faster  output  sampler 

NTGER 

1 

Integer  ratio  of  input /output  sampling  period 

DELAY 

0. 

Time  delay  (enter  negative  value  for  time  advance) 

ZOH 

1 

.NE.O  for  inclusion  of  zero  order  hold  at  the  slower  input  rate 
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V 


FORTRAN  CALL  [CALL  SWMRX(  i  ,  j  )  | 

Example  1:  Input  to  a  continuous  plant  with  a  zero  order  hold  is  sampled  at  1  Hz.  The  plant 

is  modeled  as  an  s  plane  transfer  function  in  SPTF2  and  the  output  is  sampled 
at  3  Hz.  Compute  the  output  transform  at  3  Hz  assuming  that  the  transform 
of  the  input  is  an  impulse.  Store  the  resulting  transform  into  WPTF5.  The 
FORTRAN  code  can  be  written  as: 

TW0PI=6. 2831853 
SAMPT=TW0PI/3 . 

HTGER=3 

Z0H=1 

DELAY=0 

CALL  SWMRX(5 ,2) 

PRECMP  DIRECTIVE  *SWMRX  i  j  {  sampt  delay  zoh  ntger  } 

produces  the  following  FORTRAN  statements 

SAMPT=sampt  "if  the  1st  optional  argument  is  used" 

DELAY=delay  "if  the  2nd  optional  argument  is  used" 

Z0H=zoh  "if  the  3rd  optional  argument  is  used" 

NTGER=ntger  "if  the  4th  optional  argument  is  used" 

CALL  STIME(i) 

Example  2:  *SWMRX  5  2  2.5 

produces  the  following  FORTRAN  statements 

SAMPT=2 . 5 
CALL  SWMRX(5,2) 

METHODS  See  Section  C.6. 
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SWXFM 


SWXFM 


PURPOSE:  Compute  w  transform  of  an  s  plane  transfer  function  SPTF; 

WPTF;  =  w  transform  of  SPTFj 

This  is  the  classical  w  transform  computed  by  the  partial  fraction  method.  The  transform  includes 
time  delay  and  a  zero  hold.  The  parameters  used  by  SWXFM  are  in  common  block  DBASE  de¬ 
scribed  by  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

SAMPT 

Sampling  period  of  the  faster  output  sampler 

DELAY 

"0. 

Time  delay  (enter  negative  value  for  time  advance) 

ZOH 

1 

.NE.O  for  inclusion  of  zero  order  hold  at  the  slower  input  rate 

FORTRAN  CALL 


CALL  SWXFM(  i  ,  j  ) 


Example  1:  Compute  the  w  transform  of  a  continuous  transfer  function  stored  in  SPTF3. 

The  plant  includes  a  zero  order  hold  and  a  time  delay  of  0.1  seconds.  The 
sampling  period  is  0.5  seconds.  Store  the  resulting  transform  into  WPTFi.  The 
FORTRAN  code  can  be  written  as: 


SAMPT= . 5 
DELAY= .  1 
Z0H=1 

CALL  SWXFM ( 


PRECMP  DIRECTIVE 


produces  the  following  FORTRAN  statements 

SAMPT=sampt  "if  the  1st  optional  argument  is  used" 

DELAY=delay  "if  the  2nd  optional  argument  is  used" 

Z0H=zoh  "if  the  3rd  optional  argument  is  used" 

CALL  SWXFM (i,j) 

Example  2:  *SWXFM  13.5 

produces  the  following  FORTRAN  statements 

SAMPT= . 5 
CALL  SWXFMU.3) 

METHOD  The  partial  fraction  method  is  used  to  compute  the  sampled-data  transform.  See 
Section  C.5. 


1.3) 

*SWXFM  i  j  {  sampt  delay  zoh  }  j 
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RESTRICTIONS  The  algorithms  used  for  the  partial  fraction  expansion  require  the  following 
constraints  on  the  s  plane  transfer  function:  (l)  multiple  poles  are  not  allowed  except  for  those  at 
the  origin,  (2)  the  poles  at  the  origin  (including  the  1/s  from  the  zero  order  hold  if  there  is  one) 
must  be  5  or  less,  and  (3)  the  degree  of  the  numerator  must  not  be  greater  than  the  number  of 
poles  not  at  the  origin. 
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SZMRX 


SZMRX 


PURPOSE:  Compute  the  s  to  z  plane  slow-fast  multirate  transform  (ZOH  at  slower  sampling  rate) 
ZPTFi  =  slow-fast  multirate  transform  of  SPTF; 

If  the  input  to  an  s  plane  transfer  function  is  sampled  at  a  slow  rate  and  the  output  is  sampled  at 
a  faster  (by  an  integer  multiple)  rate,  the  transfer  function  of  the  output  is  given  by: 

CT/"(zn)  =  GT/n(zn)  *  Et(z) 


where,  z  =  z  plane  variable  at  the  slow  rate 

n  =  integer  ratio  of  input /output  sampling  period 

zn  =  z  plane  variable  at  the  faster  rate 

Et(z)  =  z  plane  transform  of  the  input  at  the  slower  rate 

G(s)  =  s  plane  transfer  function  with  time  delay  and  optional  ZOH 

GT/"(zn)  =  z  plane  transform  of  G(s)  at  the  faster  rate 

CT/n(zn)  =  z  plane  transform  of  the  output  at  the  faster  rate 

G(zn)  at  the  faster  sampling  rate  could  be  computed  using  the  command  SZXFM  if  there  were  no 
slow  rate  zero  order  hold  at  the  input  to  the  plant.  If  there  is  one,  the  effects  of  the  delay  term 
of  the  zero  order  hold  must  be  correctly  accounted  for.  In  using  the  command  SZMRX,  the  faster 
sampling  rate  is  specified  by  the  parameter  SAMPT  and  the  integer  ratio  of  the  input /output  sam¬ 
pling  period  is  specified  by  NTGER.  Parameters  used  by  SZMRX  are  in  common  block  DBASE 
described  by  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

SAMPT 

1. 

Sampling  period  of  the  faster  output  sampler 

NTGER 

1 

Integer  ratio  of  input /output  sampling  period 

DELAY 

0. 

Time  delay  (enter  negative  value  for  time  advance) 

ZOH 

1 

.NE.O  for  inclusion  of  zero  order  hold  at  the  slower  input  rate 
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FORTRAN  CALL 


CALL  SZMRX(  i  ,  j  ) 


Example  1:  Input  to  a  continuous  plant  with  a  zero  order  hold  is  sampled  at  1  Hz.  The 

plant  is  modeled  as  an  s  plane  transfer  function  in  SPTF4  and  is  sampled  at  3 
Hz.  Compute  the  z  transform  at  3  Hz  at  the  output  of  the  plant  assuming  that 
the  transform  of  the  input  is  stored  in  ZPTFi-  First  compute  the  multirate  z 
transform  of  the  plant  with  a  zero  order  hold  and  store  it  into  ZPTF5.  The 
desired  output  transform  is  then  ZPTF!  *  ZPTF5.  LCAP2  cannot  compute 
this  product  since  the  z  variable  of  ZPTF5  is  at  the  faster  sampling  rate  and  the 
z  variable  of  ZPTFj  is  at  the  slower  rate.  However,  the  input  transform  can  be 
expressed  at  the  faster  rate  by  changing  its  z  variable  to  zn  by  using  the  ZVCNG 
command.  If  this  were  done  and  ZPTF2  is  the  input  transform  expressed  at 
the  faster  zn  variable,  the  desired  output  transform  is  the  product  ZPTF2  * 
ZPTF5.  Compute  this  product  and  store  into  ZPTFg.  The  FORTRAN  code 
can  be  written  as: 


TW0PI=6. 2831853 
SAMPT=TW0PI/3 . 
HTGER=3 
Z0H=1 
DELAY=0 

CALL  SWMRX(5,4) 
CALL  ZVCSG(2,1) 
CALL  ZPMPY(6,5,2) 


PRECMP  DIRECTIVE 


*SZMRX  i  j  {  sampt  delay  zoh  ntger  } 


produces  the  following  FORTRAN  statements 


SAMPT= sampt 

"if 

the 

1st 

DELAY=delay 

"if 

the 

2nd 

Z0H=zoh 

"if 

the 

3rd 

NTGER=ntger 

"if 

the 

4th 

CALL  SZKRX(i.j) 

optional  argument  is  used" 
optional  argument  is  used" 
optional  argument  is  used" 
optional  argument  is  used" 


Example  1:  *SZMRX  5  4  .5  .3 


produces  the  following  FORTRAN  statements 

SAMPT= . 5 
DELAY= . 3 
CALL  SZMRX(5,4) 


METHOD  See  Section  C.6. 
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SZXFM 


SZXFM 


PURPOSE:  Compute  the  z  transform  of  an  s  plane  transfer  function  SPTFj 
ZPTFi  =  z  transform  of  SPTFj 

This  is  the  classical  z  transform  computed  by  the  partial  fraction  method.  The  transform  includes 
time  delay  and  a  zero  hold.  The  parameters  used  by  SZXFM  are  in  common  block  DBASE  de¬ 
scribed  by  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

SAMPT 

1 

Sampling  period  of  the  faster  output  sampler 

DELAY 

0. 

Time  delay  (enter  negative  value  for  time  advance) 

ZOH 

1 

.NE.O  for  inclusion  of  zero  order  hold  at  the  slower  input  rate 

FORTRAN  CALL 


CALL  SZXFM(  i  ,  j  ) 


Example  1:  Compute  the  z  transform  of  a  continuous  transfer  function  stored  in  SPTF3. 

The  plant  includes  a  zero  order  hold  and  a  time  delay  of  0.1  seconds.  The 
sampling  period  is  0.5  seconds.  Store  the  resulting  transform  into  ZPTFx.  The 
FORTRAN  code  can  be  written  as: 


SAMPT= . 5 
DELAY= . 1 
Z0H=1 

CALL  SZXFM(1,3) 


PRECMP  DIRECTIVE 


♦SZXFM  i  j  {  sampt  delay  zoh  } 


produces  the  following  FORTRAN  statements 


SAMPT=sampt  "if  the  lBt 
DELAY=delay  "if  the  2nd 
Z0H=zoh  "if  the  3rd 
CALL  SZXFM(i.j) 


optional 

optional 

optional 


argument 

argument 

argument 


is  used" 
is  used" 
is  used" 


Example  2:  *SZXFM  13.8 


produces  the  following  FORTRAN  statements 

SAMPT= . 8 
CALL  SZXFM( 1 , 3) 
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METHOD  The  partial  fraction  method  is  used  to  compute  the  sampled-data  transform.  For 
higher  accuracy  the  computations  are  performed  in  the  w  plane  and  then  transformed  into  the  z 
plane.  See  Section  C.5. 

RESTRICTIONS  The  algorithms  used  for  the  partial  fraction  expansion  require  the  following 
constraints  on  the  s  plane  transfer  function:  (1)  multiple  poles  are  not  allowed  except  for  those  at 
the  origin,  (2)  the  poles  at  the  origin  (including  the  1/s  from  the  zero  order  hold  if  there  is  one) 
must  be  5  or  less,  and  (3)  the  degree  of  the  numerator  must  not  be  greater  than  the  number  of 
poles  not  at  the  origin. 


WELCR 


WELCR 


PURPOSE:  Eliminate  common  roots  of  w  plane  transfer  function  WPTF; 


FORTRAN  CALL 


CALL  WELCR(  i  ) 


Example  1:  Eliminate  common  roots  of  WPTF2.  The  FORTRAN  code  can  be  written  as: 


CALL  WELCR(2) 


PRECMP  DIRECTIVE  *WELCR  i 


produces  the  following  FORTRAN  statement 
CALL  WELCR (i) 


Example  2:  *  WELCR  2 


produces  the  following  FORTRAN  statement 
CALL  WELCR(2) 


METHOD  If  a  numerator  root  nrt  and  a  denominator  root  drt  are  found  such  that 
(1)  CABS(drt/nrt  -  (l.,0.))  .LT.  ECREl  for  nrt  .NE.  0.  or  (2)  CABS(drt).  LT.  ECRE2  for  nrt  .EQ. 
0.,  roots  nrt  and  drt  are  considered  to  be  common  and  will  be  eliminated  from  the  transfer  function. 
ECREl  and  ECRE2  are  in  common  block  DBASE  described  in  the  following  table.  See  Section  C.8. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

ECREl 

2.E-4 

Tolerance  for  eliminating  common  roots  in  subroutine  CRELIM 

ECRE2 

l.E-8 

Tolerance  for  “zero”  root  in  subroutine  CRELIM 
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WFREQ 


WFREQ 


PURPOSE:  Compute  frequency  response  of  w  plane  transfer  function  WPTF; 

The  frequencies  to  be  used  in  evaluating  the  frequency  response  of  WPTF;  are  specified  in  the  s 
plane  for  the  convenience  of  the  user.  The  program  will  make  the  conversion  to  the  w  plane  when 
the  response  is  computed. 

Two  modes  are  available  for  selecting  the  frequency  points  used  for  evaluating  the  frequency  re¬ 
sponse  of  transfer  function  WPTFj.  The  automatic  mode,  selected  when  FAUTO  is  nonzero, 
allows  the  user  to  specify  up  to  20  preselected  frequencies  with  the  array  OMEGA.  In  this  mode 
the  program  will  use  all  these  preselected  points  plus  its  own  dynamically  generated  points  to 
yield  a  smooth  plot.  The  number  of  preselected  points  is  determined  by  NOMEG  A.  The  begin¬ 
ning  and  last  frequency  points  for  computing  the  response  are  determined  by  OMEGA(l)  and 
OMEGA(NOMEGA),  respectively. 

In  the  nonautomatic  frequency  mode  (FAUTO=0)  the  user  can  define  up  to  five  sets  of  frequencies 
to  be  used  in  computing  the  response.  Each  of  these  sets  is  specified  by  a  three  element  array 
of  the  form  FREQk(i),  i=I,3.  If  FREQk(l)=a,  FREQk(2)=b  and  FREQk(3)=c,  the  k-th  set  of 
frequencies  specified  is: 

a,  a+c,  a+2c,  ...  a+jc,  b 

where  j  is  the  largest  integer  such  that  (a+jc)  is  less  than  b.  Each  successive  FREQk  array  must 
define  an  increasing  set  of  frequencies  such  that  the  first  value  of  the  segment  is  always  larger  than 
the  last  value  of  the  preceding  segment.  When  FREQk(3)  is  not  larger  than  FREQk(l),  as  in  the 
case  with  the  preset  values  for  k  =  2, 5  ,  those  segments  will  not  be  used. 

With  either  the  automatic  or  the  nonautomatic  frequency  mode,  the  program  will  automatically 
check  fur  the  gain  and  phase  crossover.  When  found,  the  program  will  iterate  until  the  exact 
crossover  frequency  is  found.  The  limit  on  the  number  of  plot  points  computed  is  1500. 

By  default  the  units  of  OMEGA,  FREQl,  FREQ2,  FREQ3,  FREQ4,  and  FREQ5  are  in  rad/sec. 
However,  they  can  be  changed  to  Hz  by  setting  the  parameter  RAD  to  zero. 

Bode,  Nichols,  and  Nyquist  plots  are  selected  by  the  values  of  the  flags  FBODE,  FNICO,  FNYQS, 
respectively  The  more  commonly  used  parameters  by  WFREQ  in  common  block  DBASE  are  given 
in  the  following  table.  They  include  plot  parameters. 

If  a  Bode  plot  is  selected  and  the  user  enters  a  starting  frequency  0.0  instead  of  a  nonzero  value, 
the  program  will  plot  the  response  over  6  cycles  (ignoring  the  value  of  CYCLE)  with  a  starting 
value  equal  to  l.E-6*(largest  frequency  selected). 
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parameter  preset 
FAUTO  I 


NOMEGA  2 


OMEGA 


RAD  1 

FBODE 
FNICO  0 

PMARG  |0 
FNYQS 


NQDB 
“GRAFP 
HRDCPY 
DEGMN  -360 


CYCLE  0 


FREQl(l)  1. 


|  FREQl(2)  10. 

I _ 

[  FREQ1(3)  1. 

! 

FREQk(l)  oT“ 
~FREQk(2)  oT~ 
M FREQk(3)  0T“ 
DBMAX  67“ 


DBMIN  0. 


FXYDEL  .5 
FXYMIN  -2.5 
SAMPT  1. 


COMMON/DBASE/  parameters  used 


description 

.NE.O  for  automatic  frequency  point  selection.  Uses  NOMEGA  and 
array  OMEGA. 

.EQ.O  for  user  supplied  frequency  points.  Uses  arrays  FREQl, 

FREQ2,  ...,  FREQ5. _ 

Number  of  preselected  frequency  points  in  array  OMEGA  for  use  in 
auto,  frequency  mode,  (range  =  2  -  20) 


Array  of  preselected  frequency  points  for  auto,  frequency  mode, 
(units  determined  by  RAD) 

OMEGA(l)  =  first  frequency  point  used  in  auto,  mode 
OMEGA(2)  =  second  frequency  point  used  in  auto,  mode 
OMEGA(NOMEGA)  =  last  frequency  point  used  in  auto,  mode 


.NE.O  for  rad/sec,  otherwise  Hz 


.NE.O  for  Bode  plot 


.NE.O  for  Nichols  plot 


.NE.O  for  plotting  phase  margin  instead  of  phase  for  the  Nichols  plot 


.NE.O  for  Nyquist  plot 


.NE.O  for  hardcopy  Nyquist  in  plot  in  dB  when  used  with  FNYQS 


.NE.O  for  low  resolution  printer  plots 
.NE.O  for  high  resolution  electrostatic  plots 


Minimum  defined  phase  in  frequency  response  (Phase  defined 
from  DEGMN  to  DEGMN+360.) 


Number  of  log  cycles  for  a  Bode  plot  (0-6) 
.EQ.O  for  automatic  selection 


Starting  freq.  point  for  first  segment  of  user  specified  values, 
(when  FAUTO=0).  (Units  determined  by  RAD) 


End  freq.  point  for  first  segment  of  user  specified  values 

(when  FAUTQ—0). _ 

Delta  frequency  for  first  segment  of  user  specified  values 
(when  FAUTQ=0). _ 

Starting  freq.  point  for  k-th  segment  of  user  specified  values 
(when  FAUTO=0).  k=2,5 

End  freq.  point  for  k-th  segment  of  user  specified  values 
(when  FAUTO=0).  k=2,5 

Delta  frequency  for  k-th  segment  of  user  specified  values 

(when  FAUTO=0).  k=2,5 

Maximum  dB  for  plotting  frequency  response 


Minimum  dB  for  plotting  frequency  response 
(Auto,  scaling  if  DBMIN=DBMAX) 


Nyquist  plot  scale  in  units  per  inch.  (Auto  scaling  if  FXYDEL=0) 


Nyquist  plot  parameter  -  minimum  real  and  imag.  value  plotted 
Sampling  period 


A  -  108 


FORTRAN  CALL 


CALL  WFREQ(  i  ) 


Example  1: 


Example  2: 


Compute  the  frequency  response  of  WPTF3,  using  the  auto  frequency  moHe  for 
frequencies  between  0.  and  1000.  and  at  1.,  10.,  and  100.  The  sampling  period 
of  WPTF3  is  0.2  seconds.  Select  printer  and  hardcopy  Bode  and  Nichols  plots 
with  auto  scaling.  The  FORTRAN  code  can  be  written  as: 


FAUT0=1 
N0HEGA=5 
0MEGA( 1)=0 . 
0MEGA(2)=1 . 
0MEGA(3)=lO . 
OMEGA(4)=100. 
OHEGA(5)=1000 . 
FB0DE=1 
FNIC0=1 
GRAFP=1 
HRDCPY=1 
SAHPT= . 2 
CALL  WFREQ(3) 


Compute  the  frequency  response  of  WPTF3,  using  the  nonauto  frequency  mode 
for  frequencies  between  0.  and  2.  in  increments  of  .1;  between  3.  and  20.  in 
increments  uf  1.;  and  between  22.  and  100.  in  increments  of  2.  The  sampling 
period  of  WPTF3  is  0.2  seconds.  Select  printer  and  hardcopy  Bode  and  Nichols 
plot;  with  fixed  scaling  between  -30  and  10  for  the  dB  axis.  The  FORTRAN 
code  can  be  written  as: 

FAUT0=O 

FREQ1(1)=0. 

FREQ1(2)=2 . 

FREQ1(3)=. 1 
FREQ2(1)=3. 

FREQ2(2)=20. 

FREQ2(3)=1 . 

FREQ3(1)=22. 

FREQ3(2)=100. 

FREQ3(3)=2. 

FB0DE=1 
FHIC0=1 
DBHIN=-30 
DBMAX=10 
SAMPT= . 2 
CALL  WFREQ(3) 
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PRECMP  DIRECTIVE 


*WFREQ  i  {  sampt  } 


produces  the  following  FORTRAN  statements 


SAMPT=sampt  "if  1st  optional  argument  is  used" 
CALL  WFREQ(i) 


Example  3:  Using  Example  1  from  above,  the  following  code  fragment 


FAUTO-1 

H0MEGA=5 

♦OMEGA  0  1  10  100  1000 
FB0DE=1 
FNIC0=1 
GRAFP=1 
HRDCPY=1 
SAMPT= . 2 

♦WFREQ  3 

produces  the  same  FORTRAN  statements  as  in  Example  1. 

METHOD  The  frequency  response  can  be  evaluated  by  using  either  (1)  the  coefficient  form  or 
(2)  the  root  form  (if  available)  of  WPTFj.  If  the  roots  are  available,  that  form  will  be  used  since 
i lie  response  can  be  computed  with  higher  accuracy.1 

If  the  automatic  frequency  mode  is  selected  (FAUTO.NE.O),  the  program  will  choose  frequency 
points  for  evaluating  the  response  such  that  successive  dB  and  phase  values  will  be  within  spec¬ 
ified  limits  to  yield  a  smooth  plot.  The  program  evaluates  the  first  point  using  f  =  OMEGA(l). 
Then  choosing  deltaf  =  OMEGA(l)/20  initially,  the  next  frequency  to  be  used  is  computed  as 
f  =f  +  deltaf.  Evaluating  the  response  using  this  value  of  f,  the  delta  dB  and  phase  are  compared 
to  the  specified  limits.  If  either  is  too  large,  deltaf  is  halved  and  the  response  is  recomputed.  If  both 
are  too  small,  deltaf  is  doubled  and  the  response  is  recomputed.  The  limits  for  delta  dB  is  EDBl/2 
and  EDBl.  The  limits  for  delta  phase  is  EDEGl/2  and  EDEGl.  Simultaneously  with  computing 
the  next  f  be  to  used  in  evaluating  the  response,  a  comparison  is  made  with  the  next  value  of 
OMEGA(i).  If  f  is  larger  than  OMEGA(i),  f  will  be  replaced  with  the  value  of  OMEGA(i).  This 
will  ensure  that  the  user’s  prespecified  frequency  points  will  be  used.  This  procedure  will  continue 
until  the  last  value  of  OMEGA(NOMEGA)  is  used.  There  is  a  limit  on  the  number  of  iterations 
in  computing  the  frequency  points.  This  limit  can  be  changed  by  the  parameter  MAXITF. 

If  a  frequency  point  being  used  to  evaluate  the  response  is  equal  to  a  pole  on  the  ju>,  the  warning 
message 


ZERO  IN  DENOMINATOR  AT  OMEGA  =  ...  ,  THIS  POINT  SKIPPED 

’Also,  for  very  high  order  transfer  functions,  the  following  problems  will  be  avoided:  (1)  Premature  overflow 
of  the  numerator  or  denominator  terms  if  the  coefficients  are  scaled  by  a  very  large  number.  (This  can  occur  if  a 
large  number  of  block  diagram  reduction  operations  were  used  to  compute  WPTFj.  For  this  situation,  though,  the 
command  WNORM  can  be  used  to  normalize  the  coefficients.)  and  (2)  Inherently  less  accurate  representation  of  the 
coefficients  in  a  finite  machine  (the  coefficients  are  functions  of  terms  involving  products  of  the  roots)  will  become 
pronounced  as  the  order  of  the  transfer  function  is  increased. 
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will  be  printed  out  and  the  program  allowed  to  continue.  If  this  situation  occurs  when  the  automatic 
frequency  mode  is  selected  and  OMEGA(l)=0.  (i.e.,  when  the  transfer  function  has  a  pole  at  the 
origin),  the  program  will  be  restarted  with  the  first  frequency  point  at  OMEGA(2)/10001  instead. 

Also  as  part  of  the  automatic  frequency  mode,  a  comparison  is  made  on  deltaf  to  keep  deltaf/f 
within  the  limits  of  MINDW  and  MAXDW.  The  lower  limit  MINDW  is  necessary  to  prevent  an 
excessive  number  of  plot  points  around  frequencies  with  very  low  damping  coefficients.  The  upper 
limit  MAXDW  will  ensure  that  there  are  enough  points  to  yield  a  smooth  Bode  plot. 

Since  the  plot  points  computed  to  generate  a  smooth  plot  will,  in  many  cases,  be  very  large,  only 
a  portion  of  the  computed  response  will  be  printed  out.  The  printout  is  controlled  by  the  delta  dB 
and  delta  phase  parameters,  EDB2  and  EDEG2,  respectively.  A  tabular  printout  is  made  only  if 
either  of  these  limits  is  exceeded. 

Capability  exists  for  creating  multiple  plots  on  the  high  resolution  electrostatic  printer  by  setting 
the  appropriate  value  for  the  parameter  CONTP.  See  Section  E.3  for  the  details. 

The  following  table  lists  additional  parameters  in  the  common  block  DBASE  which  the  user  can 
change. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

CONTP 

0 

=0  Single  curve  plot 
=  1  First  curve  of  a  plot 
=2  Continuation  of  a  plot 
=3  Final  curve  of  a  plot 

EDB1 

1. 

Min.  delta  dB  for  plotting 

EDB2 

2. 

Min.  delta  dB  for  printout 

EDEGl 

4. 

Max.  delta  degree  for  plotting 

EDEG2 

10. 

Max.  delta  degree  of  printout 

MINDW 

.0005 

Min.  relative  frequency  step  size 

MAXDW 

.2 

Max.  relative  frequency  step  size 

MAXITF 

3000 

Max.  number  of  iterations  allowed 

'This  will  allow  a  nonzero  deltaf  =  (OMEGA(2)/1000)/20  to  be  used  instead  of  OMEGA(1)/20  for  initializing 
the  variable  frequency  step  size. 
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WLOCI 


WLOCI 


PURPOSE:  Compute  root  loci  of  w  plane  transfer  function  WPTF; 

Root  locus  of  an  open  loop  transfer  function  WPTF;  is  computed  by  varying  the  loop  gain.  The 
gains  to  be  used  by  WLOCI  are  multipliers  of  WPTF;.  Thus,  the  gains  should  begin  at  a  value 
less  than  1.0  and  end  at  a  value  greater  than  1.0  if  the  loci  is  to  bracket  the  nominal  operating 
gain  of  the  system.  Up  to  25  preselected  gains  for  evaluating  the  root  loci  can  be  specified  with 
array  KGAIN.  The  number  of  preselected  gains  is  determined  by  NLOCI.  The  beginning  and  last 
gains  are  determined  by  KGAIN(l)  and  KGAIN(NLOCI),  respectively.  Additional  gains  can  be 
automatically  computed  by  the  program  to  fill  in  values  between  the  preselected  gains.  Between 
KGAIN(i)  and  KGAIN(i  +  l),  additional  gains  will  be  selected  by  either  of  the  following  two  methods 
if  they  are  between  KGAIN(i)  and  KG AIN(i-(-l). 

If  KFLG.EQ.O,  gain  =  KGAIN(i)  +  KDELT*j,  j=l,2,  ... 

If  KFLG.NE.O,  gain  =  KGAIN(i)*KDELT**j,  j=l,2,  ... 

For  example,  if  KGAIN(2)=  10,  KGAIN(3)=100,  KFLG=1,  and  KDELT=2,  the  following  gains 
will  be  used  to  compute  the  root  loci: 

.  .  .  10.,  20.,  40.,  80.,  100.,  .  .  . 

The  total  number  of  gains  used  is  limited  by  the  value  of  the  parameter  ITLOC  which  is  preset  to 
50.  Parameters  used  by  WLOCI  are  given  in  the  following  table. 
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COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

NLOCI 

2 

Number  of  root  locus  gains  entered  in  array  KGAIN  (max=25) 

KGAIN 

Array  of  root  locus  gains 

.5 

KGAIN(l)  =  first  user-specified  root  locus  gain 

2. 

KGAIN(2)  —  second  user-specified  root  locus  gain 
KGAIN(NLOCI)  =  last  user-specified  root  locus  gain. 

(Gains  computed  and  used  only  if  they  are  between  KGAIN(l) 
and  KGAIN(NLOCI)  ) 

KFLG 

1 

.EQ.U  to  increment  gain  by  multiplying  by  KDELT 
.NE.O  to  increment  gain  by  adding  by  KDELT 

KDELT 

1.E4 

Value  for  changing  gains  (preset  to  large  value  so  that  no  add¬ 
itional  gains  are  computed). 

ITLOC 

50 

Max.  number  of  different  gains  computed 

GRAFP 

1 

.NE.O  for  low  resolution  printer  plots 

HRDCPY 

0 

.NE.O  for  high  resolution  electrostatic  plots 

RLXMIN 

0 

Min.  x  axis  for  plotting 

RLXMAX 

0 

Max.  x  axis  for  plotting 

(Auto,  scaling  of  x  axis  if  RLXMIN=RLXMAX) 

RLYMIN 

0 

Min.  y  axis  for  plotting 

RLYMAX 

0 

Max.  y  axis  for  plotting 

(Auto,  scaling  of  y  axis  if  RLYMIN = RLYMAX) 

RLFLGl 

1 

Flag  for  numbering  root  locus  points  on  hardcopy  plots 
.EQ.l  for  numbering;  .EQ.-l  for  no  numbering 
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FORTRAN  CALL  I  CALL  WLOCI(  ij 


Example  1:  Compute  the  root  locus  of  WPTF2  by  varying  the  gain  from  0.5  to  20  by  dou¬ 

bling  the  first  gain  until  the  last  gain  is  reached.  Select  printer  and  hardcopy 
plots  with  auto  scaling.  The  FORTRAN  code  can  be  written  as: 

NL0CI=2 
KGAIN(1)= . 5 
KGAIN(2) =20 . 

KFLG=0 
KDELT=2 
GRAFP=1 
HRDCPY=1 
CALL  WL0CI(2) 


PRECMP  DIRECTIVE 


*WLOCI  i 


produces  the  following  FORTRAN  statement 
CALL  WLOCI(I) 


Example  2:  Using  Example  1  from  above,  the  following  code  fragment 

NL0CI=2 
♦KGAIN  .5  20. 

KDELT=2 
GRAFP=1 
HRDCPY=1 
♦WLOCI  2 


produces  the  following  FORTRAN  statements 


NL0CI=2 . 
KGAIN(1)= . 5 
KGAIN(2) =20 . 
KFLG=0 . 
KDELT=2 . 
GRAFP=1 . 
HRCPY=1 . 

CALL  WL0CI(2) 


METHOD  Root  locus  is  computed  by  evaluating  the  roots  of  the  polynomial  (  PN  +  k*PD  ) 
where  k  is  the  gain  to  be  varied  and  PN  and  PD  are  the  numerator  and  denominator  polynomials 
of  the  transfer  function. 
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WMRFQ 


WMRFQ 


PURPOSE:  Compute  multirate  frequency  response  of  a  w  plane  transfer  function  WPTF, 
(Frequency  decomposition) 

If  a  z  transform  GT/n(zn)  with  period  T/n  is  resampled  at  a  rate  which  is  n  times  slower,  the 
transform  at  the  slower  rate,  Gr(z),  is  given  by 

n  , — ' 

k=o 


The  command  ZMRFQ  computes  the  frequency  response  of  GT(z)  by  evaluating  the  above  equation 
with  shifted  values  of  zn.  The  command  WMRFQ  is  the  w  plane  equivalent  of  ZMRFQ. 

The  frequency  and  plot  parameters  used  by  WMRFQ  are  in  common  block  DBASE.  Since  they 
are  the  same  ones  used  by  command  WFREQ  they  will  not  be  repeated  here  (See  Reference  on 
WFREQ).  The  sampling  period  of  the  slower  rate  transform  GT(w)  is  specified  by  the  parameter 
SAMPT.  The  integer  ratio  of  the  slow/fast  sampling  periods  is  specified  by  the  parameter  NTGER. 
Both  of  these  parameters  are  in  common  block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

SAMPT 

1. 

Sampling  period  of  the  slower  output  transform 

NTGER 

.  _ 

1 

Integer  ratio  of  slow/fast  sampling  periods 

FORTRAN  CALL 


CALL  WMRFQ(  i  ) 


where,  i  =  index  of  the  faster  rate  w  plane  transfer  function  WPTF; 


Example  1:  Compute  the  multirate  (slow  rate)  frequency  response  of  WPTF4,  using  the 

auto  frequency  mode  for  frequencies  between  0.  and  1000.  The  sampling  period 
of  transfer  function  WPTF4  is  3  seconds.  The  output  of  WPTF4  is  resampled 
at  half  t*ie  rate  of  the  input,  i.e.,  sampling  period  of  6  seconds.  Select  printer  and 
hardcopy  Bode  plots  with  auto  scaling.  The  FORTRAN  code  can  be  written  as: 

FAUT0=1 
NOMEG A=2 
OMEGA (1)=0. 

OMEGA(2)=1000. 

FB0DE=1 
GRAFP=1 
HRDCPY=1 
SAMPT=6 . 

NTGER=2 
CALL  WMRFQ (4) 
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PRECMP  DIRECTIVE 


*WMRFQ  i  {  sampt  ntger  } 


produces  the  following  FORTRAN  statements 

SAMPT=sampt  "if  1st  optional  argument  is  used" 

KTGER=ntger  "if  2nd  optional  argument  is  used" 

CALL  WHRFQ(i) 

Example  2:  Using  Example  1  from  above,  the  following  code  fragment 


FAUT0=1 
N0MEGA=2 
♦OMEGA  0  1000 
FB0DE=1 
GRAFP=1 
HRDCPY=1 
♦WMRFQ  462 


produces  the  following  FORTRAN  statements 


FAUT0=1 

N0MEGA=2 

0MEGA(l)=O. 

OMEGA (2) =1000. 

FB0DE=1 

GRAFP=1 

HRDCPY=1 

SAHPT=6 

HTGER=2 

CALL  WMRFq(4) 


COMMENTS  There  is  a  command  WMRXFM  which  will  compute  a  rational  representation  of 
the  slower  rate  transform  GT(w).  However,  the  numerator  roots  may  not  be  very  accurate  if  the 
degree  is  very  large.  The  command  WMRFQ  can  be  used  to  verify  that  the  transform  computed 
by  WMRXFM  is  correct. 
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WMRXFM 


WMRXFM 


PURPOSE;  Multirate  (fast-to-slow  rate)  transform  of  a  w  plane  transfer  function  by  frequency 
decomposition 

WPTFj  --  frequency  decomposition  of  WPTFj 


If  a  z  transform  G^'n(zn)  with  period  T/n  is  resampled  at  a  rate  which  is  n  times  slower,  the 
transform  at  the  slower  rate,  GT(z),  is  given  by 


n  7 — i 


k-o 


The  command  ZMRXFM  computes  the  rational  representation  of  Gr(z)  as  a  function  of  the  slower 
rate  z  variable.  The  command  WMRXFM  is  the  w  plane  equivalent  of  ZMRXFM. 

The  sampling  period  of  the  slower  rate  transform  GT(w)  is  specified  by  the  parameter  SAMPT. 
The  integer  ratio  of  slow/fast  sampling  periods  is  specified  by  the  parameter  NTGER.  Both  of 
these  parameters  are  in  common  block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

SAMPT 

1. 

Sampling  period  of  the  slower  output  transform 

NTGER 

1 

Integer  ratio  of  slow/fast  sampling  periods 

FORTRAN  CALL 


CALL  WMRXFM(  i,  j  ) 


where,  i  =  index  of  the  slower  rate  w  plane  transform  WPTF; 
j  =  index  of  the  faster  rate  w  plane  transform  WPTF; 


Example  1:  Compute  the  multirate  (frequency  decomposition)  transform  of  WPTF5  and 

store  into  WPTF4.  The  sampling  period  of  transform  WPTF5  is  3  seconds. 
The  output  of  WPTF5  is  resampled  at  one  third  the  rate  of  the  input,  i.e., 
sampling  period  of  1  second.  The  FORTRAN  code  can  be  written  as: 


SAMPT=1 . 

UTGER=3 

CftT.L  WMRXFM (4, 5) 


PRECMP  DIRECTIVE 


♦  WMRXFM  i  j  {  sampt  ntger  } 
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produces  the  following  FORTRAN  statements 


SAMPT=sampt  “if  1st  optional  argument  is  used" 

UTGER=ntger  “if  2nd  optional  argument  is  used" 

CALL  WMRXFM(i.j) 

Example  2:  Using  Example  1  from  above,  the  following  PRECMP  directive 

♦WMRXFM  4  5  1.  3 

produces  the  following  FORTRAN  statements 

SAMPT=1 . 

NTGER=3 

CALL  WMRXFH(4,5,3) 

METHOD  See  Section  C.6. 

COMMENTS  The  results  of  this  transform  may  not  be  very  accurate  for  higher  order  transforms. 
To  check  the  accuracy,  the  frequency  response  of  the  resulting  transform  WPTF;  can  be  evaluated 
and  compared  with  the  fre  mency  response  computed  by  the  command  WMRFQ. 
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WNORM 


WNORM 


PURPOSE:  Normalize  coefficients  of  w  plane  transfer  function  WPTF; 

Normalization  can  be  either  with  respect  to  the  low  order  nonzero  coefficient  or  the  high  order 
coefficient  of  the  denominator.  The  parameter  NRMHI  determines  which  method  is  to  be  used. 

If  NRMHI  is  equal  to  zero,  the  low  order  nonzero  coefficient  of  the  denominator  is  set  equal  to  the 
parameter  KNORM  and  all  other  coefficients  are  normalized  to  this  value. 

If  NRMHI  is  not  equal  to  zero,  the  high  order  coefficient  of  the  denominator  is  set  equal  to  the 
parameter  KNORM  and  all  other  coefficients  are  normalized  to  this  value.  Parameters  used  by 
WNORM  are  given  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

KNORM 

1. 

Value  used  for  normalizing  the  transfer  function 

NRMHI 

0 

.EQ.O  for  normalizing  to  the  low  order  nonzero  coefficient 
.NE.O  for  normalizing  to  the  high  order  coefficient 

FORTRAN  CALL 


CALL  WNORM(  i  ) 


Example  1:  If  the  w  plane  transfer  function 


iv  +  14 

2  w2  +  7  w  +  78 

stored  in  WPTFj  ,  is  to  be  normalized  so  that  the  low  order  denominator 
coefficient  is  1.0,  the  FORTRAN  code  can  be  written  as: 


NRHH3>0 

KN0RM=1. 

CALL  WNORM(l) 


PRECMP  DIRECTIVE 


★  WNORM  i  {  nrmhi  knorm  } 


produces  the  following  FORTRAN  statements 


NRMHI=nrmhi 
OORM=knorm 
CALL  WBORM(i) 


"if  1st  optional  argument  is  used" 
"if  2nd  optional  argument  is  used" 
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Example: 


♦WNORM  102. 


produces  the  following  FORTRAN  statements 

NRMHI=0 
KH0RM=2 . 

CALL  WNORM(l) 
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WPADD 


WPADD 


PURPOSE:  W  plane  transfer  function  add 

WPTF;  =  WPTFj  +  WPTFk 


FORTRAN  CALL 


CALL  WPADD(  i , j , k  ) 


Example:  Add  WPTF4  to  WPTFj  and  store  into  WPTF3.  The  FORTRAN  code  can  be 
written  as: 


CALL  WPADD (3, 4, 2) 


PRECMP  DIRECTIVE 


♦WPADD  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  WPADD(i.j.k) 


Example:  *WPADD  3  4  2 


produces  the  following  FORTRAN  statement 
CALL  WPADD(3,4,2) 

COMMENTS  If  the  roots  of  both  WPTFj  and  WPTFk  are  available  (loaded  in  or  computed 
from  a  previous  command)  any  common  roots  between  the  denominators  will  be  factored  out  before 
the  sum  is  computed. 
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WPCLSLP 


WPCLSLP 


PURPOSE:  W  plane  closed  loop  transfer  function 

WPTFj  =  WPTFj  /  (  1  +  WPTFj*WPTFk  ) 


FORTRAN  CALL 


CALL  WPCLSLP(  i  ,  j  ,  k  ) 


Example:  Compute  closed  loop  transfer  function  WPTF4  where  WPTF2  is  the  forward  loop 
transfer  function  and  WPTF3  is  the  feedback  transfer  function.  The  FORTRAN 
code  can  be  written  as: 


CALL  WPCLSLP(4,2,3) 


PRECMP  DIRECTIVE 


♦WPCLSLP  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  WPCLSLP (i.j.k) 


Example:  *WPCLSLP  4  2  3 


produces  the  following  FORTRAN  statement 
CALL  WPCLSLP (4 ,2, 3) 
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WPDEL 


WPDEL 


PURPOSE:  W  plane  transfer  function  delete 

Deletes  transfer  function  WPTF;  from  the  current  list  of  transfer  function  arrays  in  use 

FORTRAN  CALL  |  CALL  WPDEL(  i  ) 

Example:  Delete  WPTF3  from  the  current  list  of  transfer  function  arrays  in  use.  The 

FORTRAN  code  can  be  written  as: 

CALL  WPDEL(3) 

PRECMP  DIRECTIVE  j  *WPDEL  i 

produces  the  following  FOR^  VN  statement 
CALL  WPDEL (i) 

COMMENTS  When  the  command  SAVE  is  invoked  all  polynomials,  transfer  functions,  and 
matrix  data  will  be  saved  to  a  file.  At  the  present  time  there  is  no  means  to  select  only  a  subset  of 
this  data  to  be  saved.  The  command  WPDEL,  however,  allows  the  user  to  delete  w  plane  transfer 
functions  from  the  current  list  of  transfer  functions  in  use. 


WPDIV 


WPDIV 


PURPOSE:  W  plane  transfer  function  divide 

WPTFi  =  WPTFj  /  WPTFk 

FORTRAN  CALL  |  CALL  WPDIV(  i  ,  j  ,  k  )~ 

Example:  Divide  WPTF4  by  WPTF2  and  store  into  WPTF3.  The  FORTRAN  code  can  be 
written  as: 

CALL  WPDIV(3,4,2) 

PRECMP  DIRECTIVE  |  *  WPDIV  i  j  k 

produces  the  following  FORTRAN  statement 
CALL  WPDIVfi, j ,k) 

Example:  *WPDIV  3  4  2 

produces  the  following  FORTRAN  statement 
CALL  WPDIV(3 ,4,2) 

METHOD  If  the  roots  of  WPTFj  and  WPTFk  are  available  (loaded  in  or  computed  in  a 
previous  command)  the  quotient  is  computed  from  the  roots  instead  of  from  the  coefficients. 
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WPEQU 


WPEQU 


PURPOSE:  W  plane  transfer  function  equal 

WPTFi  =  WPTFj 


FORTRAN  CALL 


CALL  WPEQU(  i  ,  j  ) 


Example:  Equate  WPTF4  to  WPTF2.  The  FORTRAN  code  can  be  written  as: 


CALL  WPEQU(4,2) 


PRECMP  DIRECTIVE 


♦WPEQU  i  j 


produces  the  following  FORTRAN  statements 
CALL  WPEQUCi.j) 


Example: 

*wPEqu  4  2 


produces  the  following  FORTRAN  statement 
CALL  WPF.QU(4,2) 
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WPLDC 


WPLDC 


PURPOSE:  Load  transfer  function  coefficients  into  WPTF; 

WPTFj  =  POLYN  /  POLYD 

To  load  coefficients  into  WPTF;  ,  coefficients  must  first  be  loaded  into  the  arrays  POLYN  and 
POLYD.  The  command  WPLDC  copies  the  coefficients  in  POLYN  and  POLYD  into  WPTF;.  The 
arrays  POLYN  and  POLYD  are  in  common  block  POLYCM  described  in  the  following  table: 

COMMON/POLYCM/  parameters  used _ 

description 

Array  for  entering  coefficients  of  a  numerator  polynomial 
for  use  with  command  SPLDC,  WPLDC,  ZPLDC.  The  format  is: 
POLYN(l)  =  degree  (.LE.  MXPDEG) 

POLYN(2)  =  coefficient  of  **0 
POLYN(3)  =  coefficient  of  **1 

POIYN(n-fl)  =  coefficient  of  *»u 

Array  for  entering  coefficients  of  a  denominator  polynomial 
for  use  with  command  SPLDC,  WPLDC,  ZPLDC.  The  format  is: 
POLYD(l)  =  degree  (.LE.  MXPDEG) 

POLYD(2)  =  coefficient  of  **0 
POLYD(3)  =  coefficient  of  **1 

I 

•  i 

POLYD(n+l)  =  coefficient  of  **n  ' 

FORTRAN  CALL  j~CALL  WPLDC(  i  )~| 

Example  1:  Load  the  transfer  function 

8  w  +  3 

17iu2  +  6w  +  11 

into  WPTF4.  The  first  step  is  to  load  the  numerator  and  denominator  into 
POLYN  and  POLYD,  respectively.  The  FORTRAN  code  can  be  written  as: 

P0LYJT(1)  =  1 
POLYN (2)=3 
P0LYN(3)=8 
PQLYD(1)=2 
P0LYD(2)=11 
PuLYD(3)=6 
P0LYD(4)=17 
CALL  WPLDC(4) 


parameter 

preset 

POLYN 

0 

POLYD  1 

i 

0 

_ 
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PRECMP  DIRECTIVE 


*WPLDC  i 


produces  the  following  FORTRAN  statement 
CALL  WPLDC(i) 

Example  2:  Using  Example  1  from  above,  the  following  PRECMP  directives 

*P0LYN  138 
*P0LYD  2  11  6  17 
*WPLDC  4 

produces  the  same  FORTRAN  code  given  in  Example  1.  See  Section  4.2.4  for 
definition  of  the  *POLYN  and  *POLYD  directives. 

RESTRICTIONS  The  degree  of  the  numerator  and  denominator  must  be  .LE.MXPDEG. 
(MXPDEG  =  49  for  the  regular  version  of  LCAP2,  =  100  for  large  model  version  on  the  CRAY). 
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WPLDR 


WPLDR 


PURPOSE:  Load  transfer  function  roots  into  WPTFj 
WPTFj  =  ROOTN  /  ROOTD 

To  load  roots  into  WPTFj  ,  coefficients  must  first  be  loaded  into  the  arrays  ROOTN  and  ROOTD. 
The  command  WPLDR  copies  the  coefficients  in  ROOTN  and  ROOTD  into  WPTFj.  The  complex 
arrays  ROOTN  and  ROOTD  are  in  common  block  ROOTCM  described  in  the  following  table: 


r 

COMMON/ROOTCM/  parameters  used 

parameter 

preset 

description 

r ROOTN 

1 

0 

Complex  array  for  entering  numerator  roots  into  a  transfer 
function  for  use  with  commands  SPLDC,  WPLDC,  or  ZPLDC. 
The  format  is: 

ROOTN(l)  =  CMPLX(degree,gainn) 

where  gainn  —  low  order  nonzero  numerator  coefficient 
ROOTN(2)  —  numerator  root  number  1 

ROOTN(3)  =  numerator  root  number  2 

• 

i 

1 

1 

i  : 

ROOTN(n-fl)  =  numerator  root  number  n 

ROOTD 

. 

0 

Complex  array  for  entering  numerator  roots  into  a  transfer 
function  for  use  with  commands  SPLDC,  WPLDC,  or  ZPLDC. 
The  format  is: 

j  I  HC  I  VI  11  Ld  lO. 

j  ROOTD(l)  =  CMPLX(degree,gaind) 


I  where  gaind  =  low  order  nonzero  denominator  coefficient 
!  j  ROOTD(2)  =  denominator  root  number  1 

j  ROOTD(3)  =  denominator  root  number  2 

j _ |_  ROQTD(  n  +  1)  =  denominator  root  number  n 

FORTRAN  CALL  [CALL  WPI,DR(  i  )  j 
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Example  1: 


Load  the  transfer  function 


50( -  +  1) 

7(t+“i)(3^5  +  1)(3T^+1) 

into  WPTF2  .  The  first  step  is  to  load  the  numerator  and  denominator  into  the 
complex  arrays  ROOTN  and  ROOTD,  respectively.  The  FORTRAN  code  can 
be  written  as: 


R00T»(1)=(1. ,50.) 
R00TN(2)=(-2 . ,0.) 
R00TD(1)=(3. ,7.) 
R00TD(2)=(-4. ,0.) 
R00TD(3)  =  (-3.  ,5.) 
R00TD(4)=(-3. , -5 . ) 
CALL  WPLDR(2) 


PRECMP  DIRECTIVE 


*WPLDR  i  j  J 


produces  the  following  FORTRAN  statement 


CALL  WPLDR(i) 


Example  2:  Using  Example  1  from  above,  the  following  PRECMP  directives 

*R00Tff  50.  -2 
*R00TD  7  -4  (-3.  ,5. ) 

*WPLDR  2 


wiU  yield  a  set  of  FORTRAN  statements  which  will  be  functionally  equivalent 
to  those  given  in  Example  l  above.  The  FORTRAN  code  generated  by  the 
♦  ROOTN  and  *  ROOTD  PRECMP  directives  includes  calls  to  several  subrou¬ 
tines  which  will  convert  various  root  formats  (i.e.  real,  (real,imag),  [zeta, omega!, 
and  <tau">)  into  LCAP2  root  array  format.  Note  that  the  number  of  roots  do  not 
have  to  he  entered.  It  will  be  computed  by  the  *ROOTN  and  *  ROOTD  direc¬ 
tives.  Also,  it  can  optionally  allow  the  user  to  specify  the  high  order  coefficients 
instead  of  the  low  order  nonzero  coefficients  for  the  numerator  and  denominator 
“gains”.  See  Section  4.2.4  for  description  of  *ROOTN  and  *ROOTD. 

RESTRICTIONS  The  degree  of  the  numerator  and  denominator  must  be  .LE.  MXPDEC 

(MXPDEG  49  for  the  regular  version  of  LCAP2,  =  100  for  the  large  order  model  on  the  CRAY) 
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WPMPY  WPMPY 

PURPOSE:  W  plane  transfer  function  multiply 
WPTF;  =  WPTFj  *  WPTFk 


FORTRAN  CALL 


CALL  WPMPY(  i  ,  j  ,  k  ) 


Example:  Multiply  WPTF4  and  WPTF2  and  store  into  WPTF3.  The  FORTRAN  code  can 
be  written  as: 


CALL  WPMPY (3, 4, 2) 


PRECMP  DIRECTIVE 


♦  WPMPY  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  WPMPY(i,j,k) 


Example:  *WPMPY  3  4  2 

produces  the  following  FORTRAN  statement 
CALL  WPMPY(3,4,2) 

METHOD  If  the  roots  of  WPTFj  and  WPTFk  are  available  (loaded  in  or  computed  in  a 
previous  command)  the  product  is  computed  from  the  roots  instead  of  from  the  coefficients. 
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WPTF 

alias:  WPPRN 


WPTF 
alias:  WPPRN 


PURPOSE:  Print  out  s  plane  transfer  function  WPTFj 


FORTRAN  CALL 


CALL  WPTF(  i  )] 


Example:  Print  out  contents  of  WPTFj.  The  FORTRAN  code  can  be  written  as: 


CALL  WPTF(l) 


PRECMP  DIRECTIVE 


♦  WPTF  i 


produces  the  following  FORTRAN  statement 
CALL  WPTF(i) 


Example:  *WPTF  1 


produces  the  following  FORTRAN  statement 
CALL  WPTF ( 1 ) 

COMMENTS  This  command  was  called  WPPRN  in  previous  versions  of  LCAP2. 
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WPRTS 


WPRTS 


PURPOSE:  Compute  roots  of  w  plane  transfer  function  WPTF; 

FORTRAN  CALL  (CALL  WPRTS(  i  ) 

Example  1:  Compute  the  roots  of  WPTF  >  The  FORTRAN  rode  can  be  written  as: 


CALL  WPRTS(2) 


PRECMP  DIRECTIVE 


+WPRTS  i 


produces  the  following  FORTRAN  statement 

CALL  WPRTS (i) 


Example  2:  *WPRTS  2 

produces  the  following  FORTRAN  statement 
CALL  WPRTS (2) 

METHOD  The  Aerospace  root  finding  MULE  [8]  routine  is  used  to  find  the  roots.  See  Section 

C.l. 
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WPSUB 


WPSUB 


PURPOSE:  W  plane  transfer  function  subtract 

WPTFi  =  WPTFj  WPTFk 


FORTRAN  CALL 


CALL  WPSUB(  i  ,  j  ,  k  ) 


Example:  Subtract  WPTFj  from  WPTF;  and  store  into  WPTF3.  The  FORTRAN  code  can 
be  written  as: 


CALL  WPSUB (3, 2, 4) 


PRECMP  DIRECTIVE 


♦WPSUB  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  WPSUB(i,j,k) 


Example:  *WPSUB  3  2  4 


produces  the  following  FORTRAN  statement 
CALL  WPSUB(3 ,2,4) 

COMMENTS  If  the  roots  of  both  WPTFj  and  WPTFk  are  available  (loaded  in  or  computed 
from  a  previous  command)  any  common  roots  between  the  denominators  will  be  factored  out  before 
the  difference  is  computed. 
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WSXFM 


WSXFM 


PURPOSE:  Transform  w  plane  roots  to  “equivalent”  s  plane  roots 

Transform  w  plane  roots  of  WPTF;  into  “equivalent”  s  plane  roots.  The  transformation  of  w  plane 
roots  to  the  s  plane  is  not  unique.  The  “equivalent”  s  plane  roots  are  provided  solely  to  aid  the 
analyst  in  identifying  and  correlating  w  plane  roots.  The  computed  roots  are  not  saved  into  an 
s-plane  transfer  function.  The  sampling  period  of  WPTFj  is  specified  by  the  parameter  SAMPT 
in  common  block  DBASE  described  by  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

SAMPT 

1. 

Sampling  period 

FORTRAN  CALL 


CALL  WSXFM(  i  ) 


where,  i  =  index  of  w  plane  transfer  function  WPTF; 


Example  1: 


Compute  the  “equivalent”  s  plane  roots  of  WPTF3  which  has  a  sampling  period 
of  1.5  seconds.  The  FORTRAN  code  can  be  written  as: 


SAMPT=1 . 5 
CALL  WSXFM(3) 


PRECMP  DIRECTIVE 


*WSXFM  i  {  sampt  } 


produces  the  following  FORTRAN  statements 

SAMPT=sampt  "if  1st  optional  argument  is  used" 

CALL  WSXFM(i) 

Example  2:  *WSXFM  3  1.5 

produces  the  following  FORTRAN  statements 

SAMPT=1 . 5 
CALL  WSXFM(3) 

METHOD  Transformation  of  the  roots  from  w  to  the  s  plane  is  defined  by 

s  =  ln(  (l  +  w)/(l-w)  )  /  SAMPT 

When  w  =  -1.0  or  +1.0  the  “equivalent’  s  plane  root  is  undefined.  If  CABS(l.-w)  is  less  than 
1.E-5,  the  equivalent  root  is  printed  out  as  999999.99.  If  CABS(w+l.)  is  less  than  l.E-5,  the 
equivalent  root  is  printed  out  as  -999999.99. 
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WZXFM 


WZXFM 


PURPOSE:  Bilinear  transform  from  w  to  z  plane 
ZPTF;  =  z  transform  of  WPTFj 

Compute  the  bilinear  transform  of  WPTFj  and  store  into  ZPTF;.  The  bilinear  transform  is 
defined  by, 


1  +  w 
1  -  w 


FORTRAN  CALL  j^CALL  WZXFM(  i  J] 

where,  i  =  index  of  z  plane  transfer  function  ZPTF; 

j  =  index  of  w  plane  transfer  function  WPTFj 

Example  1:  Compute  the  w  to  z  plane  bilinear  transform  of  WPTF2  and  store  into  ZPTF5. 

The  FORTRAN  code  can  be  written  as: 

CALL  WZXFM(5,2) 

PRECMP  DIRECTIVE  [TwZXFM  i  j~ 

produces  the  following  FORTRAN  statement 
CALL  WZXFM(i.j) 

Example  2:  *WZXFM  5  2 

produces  the  following  FORTRAN  statement 
CALL  WZXFM(5 , 2) 

METHOD  For  higher  accuracy,  the  bilinear  transform  is  implemented  by  using  the  roots  of 
WPTFj  rather  than  its  coefficients. 
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ZELCR 


ZELCR 


PURPOSE:  Eliminate  common  roots  of  z  plane  transfer  function  ZPTF; 


FORTRAN  CALL 


CALL  ZELCR(  i  ) 


Example  1:  Eliminate  common  roots  of  ZPTF2.  The  FORTRAN  code  can  be  written  as: 


CALL  ZELCRC2) 


PRECMP  DIRECTIVE  *ZELCRi 


produces  the  following  FORTRAN  statement 
CALL  ZELCR(i) 


Example  2:  ■•■ZELCR  2 


produces  the  following  FORTRAN  statement 
CALL  ZELCR(2) 


METHOD  If  a  numerator  root  nrt  and  a  denominator  root  drt  are  found  such  that 
(1)  CABS(drt/nrt  -  (l.,0.))  .LT.  ECRE1  for  nrt  .NE.  0.  or  (2)  CABS(drt).  LT.  ECRE2  for  nrt 
.EQ.  0.,  roots  nrt  and  drt  are  considered  to  be  common  and  will  be  eliminated  from  the  transfer 
function.  ECRE1  and  ECRE2  are  in  common  block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

ECREl 

2.E-4 

Tolerance  for  eliminating  common  roots  in  subroutine  CRELIM 

ECRE2 

l.E-8 

Tolerance  for  “zero”  root  in  subroutine  CRELIM 

See  Section  C.8. 
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ZFREQ 


ZFREQ 


PURPOSE:  Compute  frequency  response  of  z  plane  transfer  function  ZPTF; 

The  frequencies  to  be  used  in  evaluating  the  frequency  response  of  ZPTF;  are  specified  in  the  s 
plane  for  the  convenience  of  the  user.  The  program  will  make  the  conversion  to  the  z  plane  when 
the  response  is  computed. 

Two  modes  are  available  for  selecting  the  frequency  points  used  for  evaluating  the  frequency  re¬ 
sponse  of  transfer  function  ZPTF;.  The  automatic  mode,  selected  when  FAUTO  is  non-zero, 
allows  the  user  to  specify  up  to  20  preselected  frequencies  with  the  array  OMEGA.  In  this  mode 
the  program  will  use  all  these  preselected  points  plus  its  own  dynamically  generated  points  to 
yield  a  smooth  plot.  The  number  of  preselected  points  is  determined  by  NOMEG  A.  The  begin¬ 
ning  and  last  frequency  points  for  computing  the  response  are  determined  by  OMEGA(l)  and 
OMEGA(NOMEGA),  respectively. 

In  the  nonautomatic  frequency  mode  (FAUTO=0)  the  user  can  define  up  to  five  sets  of  frequencies 
to  be  used  in  computing  the  response.  Each  of  these  sets  are  specified  by  a  three  element  array 
of  the  form  FREQk(i),  i=l,3.  If  FREQk(l)=a,  FREQk(2)=b  and  FREQk(3)  =  c,  the  k-th  set  of 
frequencies  specified  is: 

a,  a+c,  a+2c,  ...  a+jc,  b 

where  j  is  the  largest  integer  such  that  (a-f jc)  is  less  than  b.  Each  successive  FREQk  array  must 
define  an  increasing  set  of  frequencies  such  that  the  first  value  of  the  segment  is  always  larger  than 
the  last  value  of  the  preceding  segment.  When  FREQk(3)  is  not  larger  than  FREQk(l),  as  in  the 
case  with  the  preset  values  for  k  —  2,  5  ,  those  segments  will  not  be  used. 

With  either  the  automatic  or  the  nonautomatic  frequency  mode,  the  program  will  automatically 
check  for  the  gain  and  phase  crossover.  When  found,  the  program  will  iterate  until  the  exact 
crossover  frequency  is  found.  The  limit  on  the  number  of  plot  points  computed  is  1500. 

By  default  the  units  of  OMEGA,  FREQl,  FREQ2,  FREQ3,  FREQ4,  and  FREQ5  are  in  rad/sec. 
However,  they  can  be  changed  to  Hz  by  setting  the  parameter  RAD  to  zero. 

Bode,  Nichols,  and  Nyquist  plots  are  selected  by  the  values  of  the  flags  FBODE,  FNICO,  FNYQS, 
respectively.  The  more  commonly  used  parameters  by  ZFREQ  in  common  block  DBASE  are  given 
in  the  following  table.  They  include  plot  parameters. 

If  a  Bode  plot  is  selected  and  the  user  enters  a  starting  frequency  of  0.0  instead  of  a  nonzero  value, 
the  program  will  plot  the  response  over  6  cycles  (ignoring  the  value  of  CYCLE)  with  a  starting 
value  equal  to  l.E-6*(largest  frequency  selected). 
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COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

FAUTO 

1 

.NE.O  for  automatic  frequency  point  selection.  Uses  NOMEGA  and 
array  OMEGA. 

.EQ.O  for  user  supplied  frequency  points.  Uses  arrays  FREQl, 
FREQ2,  ...,  FREQ5. 

NOMEGA 

2 

Number  of  preselected  frequency  points  in  array  OMEGA  for  use  in 
auto,  frequency  mode,  (range  =  2  -  20) 

OMEGA 

1. 

Array  of  preselected  frequency  points  for  auto,  frequency  mode. 

(units  determined  by  RAD) 

OMEGA(l)  =  first  frequency  point  used  in  auto,  mode 

10. 

OMEGA(2)  =  second  frequency  point  used  in  auto,  mode 

OMEG A(NOMEG A)  =  last  frequency  point  used  in  auto,  mode 

!  RAD 

1 

.NE.O  for  rad/sec,  otherwise  Hz 

FBODE 

1 

.NE.O  for  Bode  plot 

FNICO 

0 

.NF.O  for  Nichols  plot 

PMARG 

0 

.NE.O  for  plotting  phase  margin  instead  of  phase  for  the  Nichols  plot 

FNYQS 

0 

.NE.O  for  Nyquist  plot 

j  NQDB 

0 

.NE.O  for  hardcopy  Nyquist  plot  in  dB  when  used  with  FNYQS 

l  GRAFP 

1 _  _ 

1 

.NE.O  for  low  resolution  printer  plots 

HRDCPY 

0 

.NE.O  for  high  resolution  electrostatic  plots 

DEGMN 

-360. 

Minimum  defined  phase  in  frequency  response  (Phase  defined 
from  DEGMN  to  DEGMN  +  360.) 

CYCLE 

0 

Number  of  log  cycles  for  a  Bode  plot  (0-6) 

.EQ.O  for  automatic  selection 

FREQl(l) 

i. 

Starting  freq.  point  for  first  segment  of  user  specified  values 
(when  FAUTO=0).  (Units  determined  by  RAD) 

FREQ1(2) 

10. 

End  freq.  point  for  first  segment  of  user  specified  values 
(when  FAUTO  =  0). 

FREQ1(3) 

1. 

Delta  frequency  for  first  segment  of  user  specified  values 
(when  FAUTO=0). 

FREQk(l) 

0. 

Starting  freq.  point  for  k-th  segment  of  user  specified  values 
(when  FAUTO=0).  k=2,5 

FREQk(2) 

0. 

End  freq.  point  for  k-th  segment  of  user  specified  values 
(when  FAUTO=0).  k=2,5 

FREQk(3) 

0. 

Delta  frequency  for  k-th  segment  of  user  specified  values 
(when  FAUTO=0).  k=2,5 

DBMAX 

0. 

Maximum  dB  for  plotting  frequency  response 

DBMIN 

0. 

Minimum  dB  for  plotting  frequency  response. 

(Auto,  scaling  if  DBMIN=DBMAX) 

FXYDEL 

.5 

Nyquist  plot  scale  in  units  per  inch.  (Auto  scaling  if  FXYDEL=0) 

FXYMIN 

Nyquist  plot  parameter  -  minimum  real  and  imag.  value  plotted 

SAMPT 

_ 

1. 

Sampling  period 
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FORTRAN  CALL 


CALL  ZFREQ(T7] 


Example  1: 


Example  2: 


Compute  the  frequency  response  of  ZPTF3,  using  the  auto  frequency  mode  for 
frequencies  between  0.  and  1000.  and  at  1.,  10.,  and  100.  The  sampling  period 
of  ZPTF3  is  0.2  seconds.  Select  printer  and  hardcopy  Bode  and  Nichols  plots 
with  auto  scaling.  The  FORTRAN  code  can  be  written  as: 


FAUT0=1 

N0MEGA=5 

OMEGA<[1)=0. 

0MEGA(2)=1. 

0MEGA(3)=10 . 

OMEGA(4)=100. 

0MEGA(5)=1000 . 

FB0DE=1 

FNIC0=1 

GRAFP=1 

HRDCPY=1 

SAHPT= . 2 

CALL  ZFREQC3) 


Compute  the  frequency  response  of  ZPTF3,  using  the  nonauto  frequency  mode 
for  frequencies  between  0.  and  2.  in  increments  of  0.1;  between  3.  and  20.  in 
increments  of  1.;  and  between  22.  and  100.  in  increments  of  2.  The  sampling 
period  of  ZPTF3  is  0.2  seconds.  Select  printer  and  hardcopy  Bode  and  Nichols 
plots  with  fixed  scaling  between  -30  and  10  for  the  dB  axis.  The  FORTRAN 
code  can  be  Written  as: 


FAUT0=O 
FREQ1 ( 1) =0 . 
FREQ1 (2)=2 . 
FREQ1 (3) = . 1 
FREQ2(1)=3. 
FREQ2(2)=20 . 
FREQ2(3)=1 . 
FREQ3(1)=22. 
FREq3(2)=100 . 
FREQ3(3)=2 . 
FB0DE=1 
FKIC0=1 
DBHIN=-30 
DBMAX=10 
SAHPT= . 2 
CALL  ZFREQC3) 
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PRECMP  DIRECTIVE  +ZFREQ  i  {  sampt  } 


produces  the  following  FORTRAN  statements: 

SAHPT=sampt  "if  1st  optional  argument  is  used" 

CALL  ZFREQ(i) 


Example  3:  Using  Example  1  from  above,  the  following  code  fragment 


FAUT0=1 

N0MEGA=5 

*0MEGA  0  1  10  100  1000 
FB0DE=1 
FNIC0=1 
GRAFP=1 
HRDCPY=1 
SAMPT= . 2 

♦ZFREQ  3 

produces  the  same  FORTRAN  statements  as  in  Example  1. 

METHOD  The  frequency  response  can  be  evaluated  by  using  either  (l)  the  coefficient  form  or 
(2)  the  root  form  (if  available)  of  ZPTF;.  If  the  roots  are  available,  that  form  will  be  used  since 
the  response  can  be  computed  with  higher  accuracy.1 

rf  the  automatic  frequency  mode  is  selected  (FAUTO.NE.O),  the  program  will  choose  frequency 
points  for  evaluating  the  response  such  that  successive  dB  and  phase  values  will  be  within  spec¬ 
ified  limits  to  yield  a  smooth  plot.  The  program  evaluates  the  first  point  using  f  =  OMEGA(l). 
Then  choosing  deltaf  =  OMEGA(1)/20  initially,  the  next  frequency  to  be  used  is  computed  as 
f  =f  +  deltaf.  Evaluating  the  response  using  this  value  of  f,  the  delta  dB  and  phase  is  compared  to 
the  specified  limits.  If  either  is  too  large,  deltaf  is  halved  and  the  response  is  recomputed.  If  both 
are  too  small,  deltaf  is  doubled  and  the  response  is  recomputed.  The  limits  for  delta  dB  is  EDBl/2 
and  EDBl.  The  limits  for  delta  phase  is  EDEGl/2  and  EDEGl.  Simultaneously  with  computing 
the  next  f  be  to  used  in  evaluating  the  response,  a  comparison  is  made  with  the  next  value  of 
OMEGA(i).  If  f  is  larger  than  OMEGA(i),  f  will  be  replaced  with  the  value  of  OMEGA(i).  This 
will  ensure  that  the  user’s  prespecified  frequency  points  will  be  used.  This  procedure  will  continue 
until  the  last  value  of  OMEG A(NOMEGA)  is  used.  There  is  a  limit  on  the  number  of  iterations 
in  computing  the  frequency  points.  This  limit  can  be  changed  by  the  parameter  MAXITF. 

If  a  frequency  point  being  used  to  evaluate  the  response  is  equal  to  a  pole  on  the  unit  circle,  the 
warning  message 

'Also,  for  very  high  order  transfer  functions,  the  following  problems  will  be  avoided:  (1)  Premature  overflow 
of  the  numerator  or  denominator  terms  if  the  coefficients  are  scaled  bv  a  very  large  number.  (This  can  occur  if  a 
large  number  of  block  diagram  reduction  operations  were  used  to  compute  ZPTF|.  For  this  situation,  though,  the 
command  ZNORM  can  be  used  to  normalize  the  coefficients.)  and  (2)  Inherently  less  accurate  representation  of  the 
coefficients  in  a  finite  machine  (the  coefficients  are  functions  of  terms  involving  products  of  the  roots)  will  become 
pronounced  as  the  order  of  the  transfer  function  is  increased.  For  z  plane  transfer  functions,  the  coefficient  form 
representation  is  generally  useless  when  the  order  is  greater  than  15~20. 


A  140 


ZERO  IN  DENOMINATOR  AT  OMEGA  =r  ...  ,  THIS  POINT  SKIPPED 

will  bp  printed  out  and  the  program  allowed  to  continue.  If  this  situation  occurs  when  the  automatic 
frequency  mode  is  selected  and  OMEGA(l)=0.  (i.e.,  when  the  transfer  function  has  a  pole  at  z  — 
I.)  the  program  will  be  restarted  with  the  first  frequency  point  at  OMEG A(2)/10001  instead. 

Also  as  part  of  the  automatic  frequency  mode,  a  comparison  is  made  on  deltaf  to  keep  deltaf/f 
within  the  limits  of  MINDW  and  MAXDW.  The  lower  limit  MINDW  is  necessary  to  prevent  an 
excessive  number  of  plot  points  around  frequencies  with  very  low  damping  coefficients.  The  upper 
limit  MAXDW  will  ensure  that  there  are  enough  points  to  yield  a  smooth  Bode  plot. 

Since  the  plot  points  computed  to  generate  a  smooth  plot  will,  in  many  cases,  be  very  large,  only 
a  portion  of  the  computed  response  will  be  printed  out.  The  printout  is  controlled  by  the  delta  dB 
and  delta  phase  parameters,  EDB2  and  EDEG2,  respectively.  A  tabular  printout  is  made  only  if 
either  of  these  limits  are  exceeded. 

Capability  exists  for  creating  multiple  plots  on  the  high  resolution  electrostatic  printer  by  setting 
the  appropriate  value  for  the  parameter  CONTP.  See  Section  E.3  for  the  details. 

The  following  table  lists  additional  parameters  in  the  common  block  DBASE  which  the  user  can 
change. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

CONTP 

0 

=  0  Single  curve  plot 
-  1  First  curve  of  a  plot 
=  2  Continuation  of  a  plot 
=  3  Final  curve  of  a  plot 

EDBl 

1. 

Min.  delta  dB  for  plotting 

ED  13? 

2. 

Min.  delta  dB  for  printout 

EDEGl 

4. 

Max.  delta  degree  for  plotting 

EDEG2 

10. 

Max.  delta  degree  of  printout 

MINDW 

.0005 

Min.  relative  frequency  step  size 

MAXDW 

2 

Max.  relative  frequency  step  size 

MAXITF 

3000 

Max.  number  of  iterations  allowed 

'  tins  will  allow  a  nonzero  deltaf  (OMhtl  A(2)/  1000)/20  to  l>e  used  instead  of  OMKG  A(  1  )/2<t  for  initializing 
t  he  variable*  frequency  step  size. 
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ZLOCI 


ZLOCI 


PURPOSE:  Compute  root  loci  of  z  plane  transfer  function  ZPTF; 

Root  locus  of  an  open  loop  transfer  function  ZPTF;  is  computed  by  varying  the  loop  gain.  The 
gains  to  be  used  by  ZLOCI  are  multipliers  of  ZPTFi.  Thus,  the  gains  should  begin  at  a  value 
less  than  1.0  and  end  at  a  value  greater  than  1.0  if  the  loci  is  to  bracket  the  nominal  operating 
gain  of  the  system.  Up  to  25  preselected  gains  for  evaluating  the  root  loci  can  be  specified  with 
array  KGAIN.  The  number  of  preselected  gains  is  determined  by  NLOCI.  The  beginning  and  last 
gains  are  determined  by  KGAIN(l)  and  KG AIN(NLOCI),  respectively.  Additional  gains  can  be 
automatically  computed  by  the  program  to  fill  in  values  between  the  preselected  gains.  Between 
KG  AIN(i)  and  KG  AIN(i  +  l ),  additional  gains  will  be  selected  by  either  of  the  following  two  methods 
if  they  are  between  KGAIN(i)  and  KGAIN(i  +  l). 

If  KFLG.EQ.O,  gain  =  KGAIN(i)  +  KDELT*j,  j=l,2,  ... 

If  KFLG.NE.O,  gain  =  KGAIN(i)*KDELT**j,  j=l,2,  ... 

For  example,  if  KGAIN(2)=10,  KGAIN(3)  =  100,  KFLG  =  1,  and  KDELT=2,  the  following  gains 
will  be  used  to  compute  the  root  loci: 

.  .  .  10.,  20.,  40.,  80.,  100.,  .  .  . 

The  total  number  of  gains  used  is  limited  by  the  value  of  the  parameter  ITLOC  which  is  preset  to 
50.  Parameters  used  by  ZLOCI  are  given  in  the  following  table. 
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COMMON/DBASE/  parameters  used 


parameter 

preset 

description 

NLOCI 

O 

A. 

Number  of  root  locus  gains  entered  in  array  KGAIN  (max- 25) 

KGAIN 

Array  of  root  locus  gains 

.5 

KGAIN(l)  -  first  user-specified  root  locus  gain 

2. 

KGAIN(2)  =  second  user-specified  roof  locus  gain 
KGAIN(NLOCl)  =  last  user-specified  root  locus  gain. 

(Gains  computed  and  used  only  if  they  are  between  KGAIN(l) 
and  KG AIN(NLOCI)  ) 

KFLG 

1 

.EQ.O  to  increment  gain  by  multiplying  by  KDELT 
.NE.O  to  increment  gain  by  adding  by  KDELT 

KDELT 

1.E4 

Value  for  changing  gains  (preset  to  large  value  so  that  no  add¬ 
itional  gains  are  computed). 

ITLOC 

50 

Max.  number  of  different  gains  computed 

GRAFP 

1 

.NE.O  for  low  resolution  printer  plots 

HRDCPY 

0 

.NE.O  for  high  resolution  electrostatic  plots 

RLXMIN 

0. 

Min.  x  axis  for  plotting 

RLXMAX 

0. 

Max.  x  axis  for  plotting 

(Au*o.  scaling  of  x  axis  if  RLXMIN=RLXMAX) 

RLYMIN 

0. 

Min.  y  axis  for  plotting 

RLYMAX 

0. 

Max.  y  axis  for  plotting 

(Auto,  scaling  of  y  axis  if  RLYMIN=RLYMAX) 

1 

Flag  for  numbering  root  locus  points  on  hardcopy  plots 
.EQ.l  for  numbering;  .EQ.-l  for  no  numbering 
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FORTRAN  CALL 


CALL  ZLOCI(  i  ) 


Example  1:  Compute  the  root  locus  of  WPTF2  by  varying  the  gain  from  2  to  20  by  doubling 

the  first  gain  until  the  last  gain  is  reached.  Select  printer  and  hardcopy  plots 
with  auto  scaling.  The  FORTRAN  code  can  be  written  as: 


IL0CI=2 

KGAIH(1)=2 

KGAIN(2)=20 

KFLG=0 

KDELT=2 

GRAFP=1 

HRDCPY=1 

CALL  WL0CI(2) 


PRECMP  DIRECTIVE 


♦  ZLOCI  i 


produces  the  following  FORTRAN  statements 


CALL  ZLOCICO 


Example  2:  Using  Example  1  from  above,  the  following  code  fragment 


IL0CI=2 
*KGAM  2  20 
KFLG=0 
KDELT=2 
GRAFP=1 
HRDCPY=1 
♦ZLOCI  2 


produces  the  following  FORTRAN  statements 


ffL0CI=2. 
KGAIH(1)=2. 
KGAIH(2)=20. 
KFLG=0 . 
RDELT=2. 
GRAFP=1 . 
HRDCPY=1 . 

CALL  ZL0CI(2) 


METHOD  Root  locus  is  computed  by  evaluating  the  roots  of  the  polynomial  (  PN  +  k*PD  ) 
where  k  is  the  varied  gain  and  PN  and  PD  are  the  numerator  and  denominator  polynomials  of  the 
transfer  function. 
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ZMRFQ 


ZMRFQ 


PURPOSE:  Compute  multirate  frequency  response  of  a  z  plane  transfer  function  ZPTFj 
(Frequency  decomposition) 


If  a  z  transform  G7 /n(zn)  with  period  T/n  is  resampled  at  a  rate  which  is  n  times  slower,  the 
transform  at  the  slower  rate,  G7'(z),  is  given  by 


CTW  = 

n  k^O 

The  command  ZMRFQ  computes  the  frequency  response  of  GT(z)  by  evaluating  the  above  equation 
with  shifted  values  of  zn. 

The  frequency  and  plot  parameters  used  by  ZMRFQ  are  in  common  block  DBASE.  Since  they 
are  the  same  ones  used  by  command  ZFREQ  they  will  not  be  repeated  here  (See  Reference  on 
ZFREQ).  The  sampling  period  of  the  slower  rate  transform  Gr(z)  is  specified  by  the  parameter 
SAMPT.  The  integer  ratio  of  the  slow/fast  sampling  periods  is  specified  by  the  parameter  NTGER. 
Both  of  these  parameters  are  in  common  block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

SAMPT 

1. 

Sampling  period  of  the  slower  output  transform 

NTGER 

1 

Integer  ratio  of  slow/fast  sampling  periods 

FORTRAN  CALL 


CALL  ZMRFQ(  i  ) 


where,  i  =  index  of  the  faster  rate  z  plane  transfer  function  ZPTF; 

Example  1:  Compute  the  multirate  (slow  rate)  frequency  response  of  ZPTF4,  using  the  auto 

frequency  mode  for  frequencies  between  0.  and  1000.  The  sampling  period  of 
transfer  function  ZPTF4  is  3  seconds.  The  output  of  ZFT^  is  resampled  at 
half  the  rate  of  the  input,  i.e.,  sampling  period  of  6  secon.i  “'elect  printer  and 
hardcopy  Bode  plots  with  auto  scaling.  The  FORTRAN  cou.  n  be  written  as: 
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FAUT0=1 

K0MEGA=2 

OMEGA(1)=0 . 

OHEGA(2)=1000. 

FB0DE=1 

GRAFP=1 

HRDCPY=1 

SAHPT=6 . 

HTGER=2 

CALL  ZMRFQ(4) 


PRECMP  DIRECTIVE 


♦  ZMRFQ  i  {  sampt  ntger  } 


produces  the  following  FORTRAN  statements 

SAMPT=sampt  "if  1st  optional  argument  is  used" 

HTGER=ntger  "if  2nd  optional  argument  is  used" 

CALL  ZMRFQ (i.n) 

Example  2:  Using  Example  1  from  above,  the  following  code  fragment 


FAUT0=1 
H0MEGA=2 
♦OMEGA  0  1000 
FB0DE=1 
GRAFP=1 
HRDCPY=1 
♦ZMRFQ  462 


produces  the  following  FORTRAN  statements 


FAUT0=1 

H0MEGA=2 

OMEGA(1)=0. 

0MEGA(2)=1000 . 

FB0DE=1 

GRAFP=1 

HRDCPY=1 

SAMPT=6 

HTGER=2 

CALL  ZMRFQ (4) 


COMMENTS  There  is  a  command  ZMRXFM  which  will  compute  a  rational  representation  of 
the  slower  rate  transform  GT(z).  However,  the  numerator  roots  may  not  be  very  accurate  if  the 
degree  is  very  large.  The  command  ZMRFQ  can  be  used  to  verify  that  the  transform  computed  by 
ZMRXFivI  is  correct. 
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ZMRXFM 


ZMRXFM 


PURPOSE:  Multirate  (fast-to-slow  rate)  transform  of  a  z  plane  transfer  function  by  frequency 
decomposition 

ZPTF-,  =  frequency  decomposition  of  ZPTFj 

If  a  z  transform  Gr/n(zn)  with  period  T/n  is  resampled  at  a  rate  which  is  n  times  slower,  the 
transform  at  the  slower  rate,  GT(z),  is  given  by 


o 

The  command  ZMRXFM  computes  the  rational  representation  of  Gr(z)  as  a  function  of  the  slower 
rate  z  variable. 

The  sampling  period  of  the  slower  rate  transform  GT(z)  is  specified  by  the  parameter  SAMPT.  The 
integer  ratio  of  slow/fast  sampling  periods  is  specified  by  the  parameter  NTGER.  Both  of  these 
parameters  are  in  common  block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

SAMPT 

1- 

Sampling  period  of  the  slower  output  transform 

NTGER 

1 

Integer  ratio  of  slow/fast  sampling  periods 

FORTRAN  CALL 


CALL  ZMRXFM(  i,  j  ) 


where,  i  =  index  of  the  slower  rate  z  plane  transform  ZPTF; 
j  =  index  of  the  faster  rate  z  plane  transform  ZPTF; 


Example  1:  Compute  the  multirate  (frequency  decomposition)  transform  of  ZPTF5  and  store 

into  ZPTF4.  The  sampling  period  of  transform  ZPTFg  is  3  seconds.  The  output 
of  ZPTF5  is  resampled  at  one  third  the  rate  of  the  input,  i.e.,  sampling  period 
of  1  seconds.  The  FORTRAN  code  can  be  written  as: 


SAMPT=1 . 

NTGER=3 

CALL  ZMRXFM (4,5) 


PRECMP  DIRECTIVE 


★  ZMRXFM  i  j  {  sampt  ntger  } 


produces  the  following  FORTRAN  statements 

SAMPT=sampt  "if  1st  optional  argument  is  used" 

HTGER=ntger  "if  2nd  optional  argument  is  used" 

CALL  ZMRXFM (i.j) 
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Example  2:  Using  Example  1  from  above,  the  following  PRECMP  directive 


♦ZMRXFM  451.3 


produces  the  following  FORTRAN  statements 


SAMPT=1 . 

NTGER=3 

CALL  ZMRXFM(4,5,3) 

METHOD  See  Section  C.6. 

COMMENT  The  results  of  this  transform  may  not  be  very  accurate  for  higher  order  transforms. 
To  check  the  accuracy,  the  frequency  of  the  resulting  transform  ZPTFi  can  be  evaluated  and 
compared  with  the  frequency  response  computed  by  the  command  ZMRFQ. 


A  -  148 


ZNORM 


ZNORM 


PURPOSE:  Normalize  coefficients  of  z  plane  transfer  function  ZPTF; 

Normalization  can  be  either  with  respect  to  the  low  order  nonzero  coefficient  or  the  high  order 
coefficient  of  the  denominator.  The  parameter  NRMHI  determines  which  method  is  to  be  used 

If  NRMHI  is  equal  to  zero,  the  low  order  nonzero  coefficient  of  the  denominator  is  set  equal  to  the 
parameter  KNORM  and  all  other  coefficients  are  normalized  to  this  value. 

If  NRMHI  is  not  equal  to  zero,  the  high  order  coefficient  of  the  denominator  is  set  equal  to  the 
parameter  KNORM  and  all  other  coefficients  are  normalized  to  this  value.  Parameters  used  by 
ZNORM  are  given  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter 

preset 

description 

1. 

Value  used  for  normalizing  the  transfer  function 

NRMHI 

0 

.EQ.O  for  normalizing  to  the  low  order  non-zero  coefficient 
.NE.O  for  normalizing  to  the  high  order  coefficient 

FORTRAN  CALL  [CALL  ZNORM(  i  ) 
Example  1:  If  the  z  plane  transfer  function 


3.4z  +  3.2 
2z  +  1.3 

stored  in  ZPTFj  ,  is  to  be  normalized  so  that  the  high  order  denominator  coef¬ 
ficient  is  1.0,  the  FORTRAN  code  can  be  written  as: 


NRMFG=1 
KN0RM=1 . 

CALL  ZNORM(l) 


PRECMP  DIRECTIVE  |*ZNORM  i  {  nrmhi  knorm  } 


produces  the  following  FORTRAN  statements 

NRMHI=nrmhi  "if  1st  optional  argument  is  used" 

KH0RM=knorm  "if  2nd  optional  argument  is  used" 
CALL  ZNORM(i) 


A  -  149 


Example: 


*ZIORM  102. 


produces  the  following  FORTRAN  statements 

NRMHI=0 
KS0RM=2 . 

CALL  ZIORM(l) 
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ZPADD 


ZPADD 


PURPOSE:  Z  plane  transfer  function  add 

ZPTFi  =  ZPTFj  ZPTFk 

FORTRAN  CALL  [CALL  ZPADD(  i  ,  j  ,  k  )  j 

Example:  Add  ZPTF4  to  ZPTF2  and  store  into  ZPTF3.  The  FORTRAN  code  can  be  written 

as: 

CALL  ZPADD(3,4,2) 

PRECMP  DIRECTIVE  UZPADD  i  j  k  j 

produces  the  following  FORTRAN  statement 
CALL  ZPADD(i,j,k) 

Example:  *ZPADD  3  4  2 

produces  the  following  FORTRAN  statement 

CALL  ZPADD(3,4,2) 

COMMENTS  If  the  roots  of  both  ZPTFj  and  ZPTFk  are  available  (loaded  in  or  computed 
from  a  previous  command)  any  common  roots  between  the  denominators  will  be  factored  out  before 
the  sum  is  computed. 
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ZPCLSLP 


ZPCLSLP 


PURPOSE:  Z  plane  closed  loop  transfer  function 

ZPTF;  =  ZPTFj  /  (  1  +  ZPTFj*ZPTFk  ) 


FORTRAN  CALL 


CALL  ZPCLSLP(  i  ,  j  ,  k  ) 


Example:  Compute  closed  loop  transfer  function  ZPTF4  where  ZPTF2  is  the  forward  loop 
transfer  function  and  ZPTF3  is  the  feedback  transfer  function.  The  FORTRAN 
code  can  be  written  as: 


CALL  ZPCLSLP(4,2,3) 


PRECMP  DIRECTIVE 


♦  ZPCLSLP  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  ZPCLSLP(i,j,k) 


Example:  *ZPCLSLP  4  2  3 


produces  the  following  FORTRAN  statement 
CALL  ZPCLSLP(4,2,3) 
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ZPDEL 


ZPDEL 


PURPOSE:  Z  plane  transfer  function  delete 

Deletes  transfer  function  ZPTF;  from  the  current  list  of  transfer  function  arrays  in  use 


FORTRAN  CALL  I  CALL  ZPDEL(  i  )  ! 

Example:  Delete  ZPTF3  from  the  current  list  of  transfer  function  arrays  in  use.  The 

FORTRAN  code  can  be  written  as: 

CALL  ZPDEL(3) 

PRECMP  DIRECTIVE  [  *ZPDEL  i  ~ 


produces  the  following  FORTRAN  statement 
CALL  ZPDEL (i) 

COMMENTS  When  the  command  SAVE  is  invoked  all  polynomials,  transfer  functions,  and 
matrix  data  will  be  saved  to  a  file.  At  the  present  time  there  is  no  means  to  select  only  a  subset  of 
this  data  to  be  saved.  The  command  ZPDEL,  however,  allows  the  user  to  delete  z  plane  transfer 
functions  from  the  current  list  of  transfer  functions  in  use. 
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ZPDIV 


ZPDIV 


PURPOSE:  Z  plane  transfer  function  divide 

ZPTF;  =  ZPTFj  /  ZPTFk 


FORTRAN  CALL 


CALL  ZPDIV(  i  ,  j  ,  k  ) 


Example:  Divide  ZPTF4  by  ZPTF2  and  store  into  ZPTF3.  The  FORTRAN  code  can  be 
written  as: 


CALL  ZPDIV(3,4,2) 


PRECMP  DIRECTIVE 


♦  ZPDIV  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  ZPDIV(i.j.k) 


Example:  *ZPDIV  3  4  2 


produces  the  following  FORTRAN  statement 
CALL  ZPDIVC3.4.2) 

METHOD  If  the  roots  of  ZPTFj  and  ZPTFk  are  available  (loaded  in  or  computed  in  a  previous 
command)  the  quotient  is  computed  from  the  roots  instead  of  from  the  coefficients. 
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ZPEQU 


ZPEQU 


PURPOSE:  Z  plane  transfer  function  equal 

ZPTF;  ■=  ZPTFj 


FORTRAN  CALL 


CALL  ZPEQU(  i  ,  j  ) 


Example:  Equate  ZPTF4  to  ZPTF2.  The  FORTRAN  code  can  be  written  as: 


CALL  Z?EQU(4,2) 


PRECMP  DIRECTIVE 


♦ZPEQU  i  j 


produces  the  following  FORTRAN  statement 
CALL  ZPEQU (i,j) 


Example:  *ZPEQU  4  2 

produces  the  following  FORTRAN  statement 
CALL  ZPEQU(4, 2) 
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ZPLDC 


ZPLDC 


PURPOSE:  Load  transfer  function  coefficients  into  ZPTF; 
ZPTFi  =  POLYN  /  POLYD 


To  load  coefficients  into  ZPTF;  ,  coefficients  must  first  be  loaded  into  the  arrays  POLYN  and 
PGLYD.  The  command  WPLDC  copies  the  coefficients  in  POLYN  and  POLYD  into  ZPTF;.  The 
arrays  POLYN  and  POLYD  are  in  common  block  POLYCM  described  in  the  following  table: 


COMMON/POLYCM/  parameters  used 

parameter 

preset 

description 

POLYN 

0 

Array  for  entering  coefficients  of  a  numerator  polynomial 

for  use  with  command  SPLDC,  WPLDC,  ZPLDC.  The  format  is: 

POLYN(l)  =  degree  (.LE.  MXPDEG) 

POLYN(2)  =  coefficient  of  **0 

POLYN(3)  =  coefficient  of  **1 

POLYN(n+l)  =  coefficient  of  **n 

POLYD 

0 

Array  for  entering  coefficients  of  a  denominator  polynomial 
for  use  with  command  SPLDC,  WPLDC,  ZPLDC.  The  format  is: 
POLYD(l)  =  degree  (.LE.  MXPDEG) 

POLYD(2)  =  coefficient  of  **0 

POLYD(3)  =  coefficient  of  **1 

POLYD(n+l)  =  coefficient  of  **n 

FORTRAN  CALL 


CALL  ZPLDC(  i  ) 


Example  1:  Load  the  transfer  function 


1.6*  +  1.2 

83z2  +  160z  +  77 

into  ZPTF4.  The  first  step  is  to  load  the  numerator  and  denominator  into 
POLYN  and  POLYD,  respectively.  The  FORTRAN  code  can  be  written  as: 

P0LYN(1)=1 
P0LYN(2)=1.2 
P0LYN(3)=1 .6 
P0LYD(1)=2 
P0LYD(2)=77 . 

P0LYD(3)=160 . 

P0LYD(4)=83 . 

CALL  ZPLDC(4) 


PRECMP  DIRECTIVE 


*ZPLDC  i 

produces  the  following  FORTRAN  statement 
CALL  ZPLDC(i) 


Example  2:  Using  Example  1  from  above,  the  following  PRECMP  directives 

*P0LYN  1  1.2  1.6 
*P0LYD  2  77.  160.  83. 

♦ZPLDC  4 


produce  the  same  FORTRAN  code  given  in  Example  1.  See  Section  4.2.4  for 
definition  of  the  *POLYN  and  *POLYD  directives. 

RESTRICTIONS  The  degree  of  the  numerator  and  denominator  must  be  .LE.MXPDEG. 
(MXPDEG  =  49  for  the  regular  version  of  LCAP2,  =  100  for  large  model  version  on  the  CRAY). 
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ZPLDR 


ZPLDR 


PURPOSE:  Load  transfer  function  roots  into  ZPTFi 
ZPTFi  =  ROOTN  /  ROOTD 

To  load  roots  into  ZPTFi  >  coefficients  must  first  be  loaded  into  the  arrays  ROOTN  and  ROOTD. 
The  command  WPLDR  copies  the  coefficients  in  ROOTN  and  ROOTD  into  ZPTFj.  The  complex 
arrays  ROOTN  and  ROOTD  are  in  common  block  ROOTCM  described  in  the  following  table: 

COMMON/ROOTCM/  parameters  used 
parameter  preset  description 

ROOTN  0  Complex  array  for  entering  numerator  roots  into  a  transfer 

function  for  use  with  commands  SPLDC,  WPLDC,  or  ZPLDC. 

The  format  is: 

ROOTN(l)  =  CMPLX(degree,gainn) 

where  gainn  =  low  order  nonzero  numerator  coefficient 
ROOTN(2)  =  numerator  root  number  1 
ROOTN(3)  =  numerator  root  number  2 

ROOTN(n+l)  =  numerator  root  number  n 
ROOTD  0  Complex  array  for  entering  numerator  roots  into  a  transfer 

function  for  use  with  commands  SPLDC,  WPLDC,  or  ZPLDC. 

The  format  is: 

ROOTD(l)  =  CMPLX(degree,gaind) 

where  gaind  =  low  order  nonzero  denominator  coefficient 
ROOTD(2)  =  denominator  root  number  1 
ROOTD(3)  =  denominator  root  number  2 

ROOTD(n+l)  =  denominator  root  number  n 
FORTRAN  CALL  [CALL  ZPLDR(  i  ) 
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Example  1:  Load  the  transfer  function 


_ 2-l(^5  +  l) _ 

70(^9  +  !)(  -6-jl  +  l)(  +  1) 

into  ZPTFi  •  The  first  step  is  to  load  the  numerator  and  denominator  into  the 
complex  arrays  ROOTN  and  ROOTD,  respectively.  The  FORTRAN  code  can 
be  written  as: 


R00TN(1)=(1. ,2.1) 
ROOTN (2) =( .5,0. ) 
R00TD(1)=(3. ,70.) 
R00TD(2)=( .9,0. ) 
R00TD(3)=( . 6 , .1) 
ROOTD (4) =( . 6 , - . 1) 
CALL  ZPLDR(2) 


PRECMP  DIRECTIVE 


♦ZPLDR  i  j 


produce  the  following  FORTRAN  statement 
CALL  ZPLDR(i) 

Example  2:  Using  Example  1  from  above,  the  following  PRECMP  directives 

♦ROOTN  2.1  .5 
♦ROOTD  70  .9  ( .6, . 1) 

♦ZPLDR  2 

will  yield  a  set  of  FORTRAN  statements  which  will  be  functionally  equivalent  to 
those  given  in  Example  1  above.  The  FORTRAN  code  generated  by  the  *ROOTN 
and  *ROOTD  PRECMP  directives  includes  calls  to  several  subroutines  which  will 
convert  various  root  formats  (i.e.  real,  (real,imag),  [zeta, omega],  and  <tau>) 
into  LCAP2  root  array  format.  Note  that  the  number  of  roots  do  not  have  to  be 
entered.  It  will  be  computed  by  the  *ROOTN  and  *ROOTD  directives.  Also,  it 
can  optionally  allow  the  user  to  specify  the  high  order  coefficients  instead  of  the 
low  order  nonzero  coefficients  for  the  numerator  and  denominator  “gains”.  See 
Section  4.2.4  for  description  of  ♦ROOTN  and  ♦ROOTD. 

RESTRICTIONS  The  degree  of  the  numerator  and  denominator  must  be  .LE.  MXPDEG. 
(MXPDEG  =  49  for  the  regular  version  of  LCAP2,  =  100  for  the  large  order  model  on  the  CRAY). 
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ZPMPY 


ZPMPY 


PURPOSE:  Z  plane  transfer  function  multiply 
ZPTFi  =r  ZPTFj  *  ZPTFW 


FORTRAN  CALL 


CALL  ZPMPY(  i  ,  j  ,  k  ) 


Example:  Multiply  ZPTF4  and  ZPTF2  and  store  into  ZPTF3.  The  FORTRAN  code  can  be 
written  as: 


CALL  ZPMPY(3,4,2) 


PRECMP  DIRECTIVE 


♦  ZPMPY  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  ZPMPY(i.j.k) 


Example:  *ZPMPY  3  4  2 


produces  the  following  FORTRAN  statement 
CALL  ZPMPY (3, 4, 2) 

METHOD  If  the  roots  of  ZPTFj  and  ZPTFv  are  available  (loaded  in  or  computed  in  a  previous 
command)  the  product  is  computed  from  the  roots  instead  of  from  the  coefficients. 
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ZPTF 

alias:  ZPPRN 


ZPTF 
alias:  ZPPRN 


PURPOSE:  Print  out  z  plane  transfer  function  ZPTF; 

FORTRAN  CALL  [  CALL  ZPTF(  i  ) 

Example:  Print  out  contents  of  ZPTFx.  The  FORTRAN  code  can  be  written  as: 
CALL  ZPTF(l) 

PRECMP  DIRECTIVE  [  *ZPTF  i 

produces  the  following  FORTRAN  statement 
CALL  ZPTF(i) 

Example:  *ZPTF  1 

produces  the  following  FORTRAN  statement 
CALL  ZPTF(l) 

COMMENTS  This  command  was  called  ZPPRN  in  previous  versions  of  LCAP2. 
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ZPRTS 


ZPRTS 


PURPOSE:  Compute  roots  of  z  plane  transfer  function  ZPTF; 


FORTRAN  CALL 


CALL  ZPRTS(  i  ) 


Example  1:  Compute  the  roots  of  ZPTF2.  The  FORTRAN  code  can  be  written  as: 


CALL  ZPRTS(2) 


PRECMP  DIRECTIVE  *ZPRTS  i 


produces  the  following  FORTRAN  statement 
CALL  ZPRTS (i) 


Example  2:  *ZPRTS  2 

produces  the  following  FORTRAN  statement 
CALL  ZPRTS (2) 

METHOD  The  Aerospace  root  finding  MULE  [8]  subroutine  is  used  to  find  the  roots.  See  Section 

C.l. 


A  -  162 


ZPSUB 


ZPSUB 


PURPOSE:  Z  plane  transfer  function  subtract 

ZPTFi  =  ZPTFj  ZPTFk 


FORTRAN  CALL 


CALL  ZPSUB(  i  ,  j  ,  k  ) 


Example:  Subtract  ZPTF4  from  ZPTF2  and  store  into  ZPTF3.  The  FORTRAN  code  can 
be  written  as: 


CALL  ZPSUB(3 ,2,4) 


PRECMP  DIRECTIVE 


*ZPSUB  i  j  k 


produces  the  following  FORTRAN  statement 
CALL  ZPSUB (i.j.k) 


Example:  *ZPSUB  3  2  4 


produces  the  following  FORTRAN  statement 

CALL  ZPSUB (3, 2, 4) 

COMMENTS  If  the  roots  of  both  ZPTFj  and  ZPTF^  are  available  (loaded  in  or  computed 
from  a  previous  command)  any  common  roots  between  the  denominators  will  be  factored  out  before 
the  difference  is  computed. 
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ZSXFM 


ZSXFM 


PURPOSE:  Transform  z  plane  roots  to  “equivalent”  s  plane  roots 

Transform  z  plane  roots  of  ZPTFj  into  “equivalent”  s  plane  roots.  The  transformation  of  z  plane 
roots  to  the  s  plane  is  not  unique.  The  “equivalent”  s  plane  roots  are  provided  solely  to  aid  the 
analyst  in  identifying  and  correlating  z  plane  roots.  The  computed  roots  are  not  saved  into  a 
s-plane  transfer  function.  The  sampling  period  of  ZPTF;  is  specified  by  the  parameter  SAMPT  in 
common  block  DBASE  described  by  the  following  table. 


COMMON/DBASE/  parameters  used  j 


parameter 

preset 

description 

SAMPT 

1. 

Sampling  period 

FORTRAN  CALL 


CALL  ZSXFM(  i  ) 


where,  i  =  index  of  w  plane  transfer  function  ZPTF; 


Example  1:  Compute  the  “equivalent”  s  plane  roots  of  ZPTF3  which  has  a  sampling  period 

of  1.5  seconds.  The  FORTRAN  code  can  be  written  as: 


SAMPT=1 . 6 
CALL  ZSXFHC3) 


PRECMP  DIRECTIVE 


♦  ZSXFM  i  {  sampt  } 


produces  the  following  FORTRAN  statement 


SAMPT=sampt  "if  1st  optional  argument  is  used" 

CALL  ZSXFM(i) 


Example  2:  *ZSXFM  3 


produces  the  following  FORTRAN  statement 
CALL  ZSXFM(3) 

METHOD  Transformation  of  the  roots  from  z  to  the  s  plane  is  defined  by 


s  =  ln(  z  )  /  SAMPT 

When  z  -0  the  “equivalent”  s  plane  root  is  undefined.  If  CABS(z)  is  less  than  l.E-5,  the  equivalent 
s  plane  root  is  printed  out  as  -999999.99. 
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ZTIME 


ZTIME 


PURPOSE:  Time  response  of  transfer  function  ZPTF; 


Compute  time  response  of  a  z  plane  transfer  function.  The  input  can  be  a  step  or  impulse  as  speci¬ 
fied  by  the  parameter  TTYPE.  The  magnitude  is  specified  by  the  parameter  TMAGN.  The  response 
will  be  evaluated  every  SAMPT  seconds  from  t  —  0  to  t=TEND.  Parameters  used  by  ZTIME  are  in 
common  block  DBASE  described  in  the  following  table. 


COMMON/DBASE/  parameters  used 

parameter  preset 

description 

SAMPT 

1.  n 

Sampling  period 

TTYPE 

1 

.EQ.O  for  impulse  response;  .EQ.l  for  step  response 

TMAGN 

1. 

Magnitude  of  input 

TEND 

1. 

End  time  for  evaluating  time  response 

GRAFP 

1 

.NE.O  for  low  resolution  printer  plots 

HRDCPY 

0 

.NE.O  for  high  resolution  electrostatic  plots 

TXMIN 

0. 

Minimum  x  axis  for  time  plot 

TXMAX 

0. 

Maximum  x  axis  for  time  plot 

(Auto  scaling  of  x  axis  if  TXMIN^TXMAX) 

TYMIN 

0. 

Minimum  y  axis  for  time  plot 

TYMAX 

0. 

Maximum  y  axis  for  time  plot 

(Auto  scaling  of  y  axis  if  TYMIN=TYMAX) 

CONTP 

i 

i 

1 

0 

=0  Single  curve  plot 
=  1  First  curve  of  a  plot 
=  2  Continuation  of  a  plot 
=  3  Final  curve  of  a  plot 

FORTRAN  CALL 


CALL  ZTIME(  i  ) 


Example  1:  Compute  the  step  response  of  ZPTF2  from  0  to  25  seconds.  The  sampling  period 

is  0.5  seconds.  Select  only  high  resolution  hardcopy  plot  with  auto  scaling.  The 
FORTRAN  code  can  be  written  as: 


SAMPT= . 5 
TTYPE=1 
TMAG!J=1 . 
TEHD=25 . 
GRAFP=0 
HRDCPY=1 
CALL  ZTIHEC2) 
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PRECMP  DIRECTIVE  UZTIME  i  {  sampt  ttype  tmagn  tend  } 


produces  the  following  FORTRAN  statements 


SAMPT=sampt 
TTYPE=ttype 
TMAGN=tmagn 
TEND=tend 
CALL  ZTIME(i) 


"if  1st  optional  argument  is 
"if  2nd  optional  argument  is 
"if  3rd  optional  argument  is 
"if  4th  optional  argument  is 


used" 

used" 

used" 

used" 


Example  2:  *ZTIME  2  .5  1  1.  25. 


produces  the  following  FORTRAN  statement 

SAMPT= . 5 

TTYPE=1 

TMAGI=1. 

TEHD=25 . 

CALL  ZTIMEC2) 

METHOD  The  time  response  is  computed  by  recursive  evaluation  of  a  difference  equation.  This 
method  in  not  as  accurate  as  the  partial  fraction  method.  However,  the  results  for  typical  transfer 
functions  whose  order  is  less  than  10~15  are  very  good.  The  partial  fraction  method  will  be 
implemented  at  a  later  date. 

COMMENTS  Capability  exists  for  creating  multiple  plots  on  the  high  resolution  electrostatic 
printer  by  setting  the  appropriate  value  for  the  parameter  CONTP.  See  Section  E.3  for  the  details. 

In  previous  versions  of  LCAP2,  the  parameter  TTYPE  was  called  TSTEP. 
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ZVCNG 


ZVCNG 


PURPOSE:  7  to  zn  variable  change  of  a  z  plane  transfer  function,  i.e., 

C7y/n(zn)  =  Gr(z),  where  z=ejT  and  zn=e,T^n 
ZPTF;  =  GT/n(zn),  ifZPTFj  =  Gr(z) 

The  z  plane  variable  of  ZPTFj  is  changed  from  z  t  r  zn  for  use  in  performing  block  diagram  reduction 
of  multirate  systems.  For  example, 


GT'n(zn)*HT(z) 

is  the  product  of  two  transfer  functions  at  different  sampling  rates.  This  product  can  be  simplified 
if  the  z  variable  in  Hr(z)  were  changed  to  zn  so  that  the  product  can  be  computed  by  the  command 
ZPMP  V.  for  example,  if  HT(z)  =  (z  +  .5)/(z  -  .9),  then  for  n=2,  H7'72(zj)  would  be  (z2  4-.5)/(z2-.9). 

The  ratio  n  is  specified  by  the  parameter  NTGER  in  common  block  DBASE  described  by  the 
following  table 


COMMON/DBASE/  parameters  used 

i  parameter 

preset 

description 

NTGER 

1 

Integer  ratio  of  slow/fast  sampling  periods 

FORTRAN  CALL 


CALL  ZVCNG(  i  ,  j  ) 


Example  1:  A  plane  transfer  function  with  a  sampling  period  of  6  seconds  is  in  ZPTF]  and  a 

transfer  function  with  a  sampling  period  of  2  seconds  is  in  ZPTF5.  Compute  the 
product  of  these  two  transfer  functions  at  the  faster  sampling  rate.  The  first  step 
will  be  to  use  the  command  ZVCNG  to  compute  an  equivalent  transfer  function 
to  ZPTFj  but  at  the  faster  sampling  rate.  This  transfer  function  will  be  stored 
in  ZPTF2.  The  last  step  will  be  to  compute  the  product  of  ZPTF2  and  ZPTF5 
and  then  store  it  into  ZPTF4.  The  FORTRAN  code  can  be  written  as: 


NTGER=3 

CALL  ZVCNG(2 , 1) 
CALL  ZMPY(4,2,5) 


PRECMP  DIRECTIVE  *ZVCNG  i  j  {  ntger  } 


produces  the  following  FORTRAN  statements 

NTGER=ntger  "if  1st  optional  argument  is  used" 

CALL  ZVCSG(i.j) 
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Example  2:  *ZVCNG  4  3  2 


produces  the  following  FORTRAN  statements 

NTGER=2 

CALL  ZTIHE(4,3) 

METHOD  The  variable  change  is  made  by  simply  copying  the  coefficients  of  ZPTFj  into  the 
appropriate  coefficients  of  ZPTFj.  Since  the  coefficient  form  of  representing  a  z  plane  transfer 
function  is  only  accurate  when  the  order  is  low,  care  must  taken  when  using  this  command.  A 
more  accurate  implementation  of  this  command  would  involve  computing  the  nth  root  of  each  root 
in  ZPTFj. 

COMMENTS  Since  the  order  of  ZPTFj  will  be  n  times  the  order  of  ZPTFj,  the  user  should 
keep  in  mind  that  the  maximum  size  of  an  LCAP2  transfer  function  can  easily  be  exceeded. 
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ZWXFM 


ZWXFM 


PURPOSE:  Bilinear  transform  from  2  to  w  plane 
WPTF;  =  w  transform  of  ZPTFj 

Compute  the  bilinear  transform  of  ZPTFj  and  store  into  WPTF;.  The  bilinear  transform  is 
defined  by, 


w 


z  —  1 
■2  +  1 


FORTRAN  CALL 


CALL  ZWXFM(  i  ) 


where,  i  =  index  of  z  plane  transfer  function  WPTF; 
j  —  index  of  w  plane  transfer  function  ZPTFj 

Example  1:  Compute  the  z  to  w  plane  bilinear  transform  of  WPTF2  and  store  into  ZPTF5. 

The  FORTRAN  code  can  be  written  as: 


CALL  ZWXFM (5, 2) 


PRECMP  DIRECTIVE 


*ZWXFM  i  j 


produces  the  following  FORTRAN  statement 
CALL  ZWXFM (i,j) 


Example  2:  * ZWXFM  5  2 

produces  the  following  FORTRAN  statement 
CALL  ZWXFMC5.2) 

METHOD  For  higher  accuracy,  the  bilinear  transform  is  implemented  by  using  the  roots  of 
ZPTF;  rather  than  its  coefficients. 
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Appendix  B 


Description  of  LCAP2  Parameters 


Param. 

Preset 

Description 

BO 

0. 

Input  vector  for  coefficients  of  s°  term  of  B(s)  used  by  command  DTERM 

Bl 

0. 

Input  vector  for  coefficients  of  s1  term  of  B(s)  used  by  command  DTERM 

B2 

0. 

Input  vector  for  coefficients  of  s2  term  of  B(s)  used  by  command  DTERM 

B3 

0. 

Input  vector  for  coefficients  of  s3  term  of  B(s)  used  by  command  DTERM 

B4 

0. 

Input  vector  for  coefficients  of  s4  term  of  B(s)  used  by  command  DTERM 

CONTP 

0 

Hardcopy  plot  continuation  flag  (cannot  be  used  for  Bode  plots) 

.EQ.O  -  Single  plot 
.EQ.l  -  First  curve  of  a  plot 
.EQ.2  -  Continuation  of  a  plot 
.EQ.3  -  Final  curve  of  a  plot 

CYCLE 

0 

Number  of  log  cycles  for  a  Bode  plot  (0-6) 

.EQ.O  for  automatic  selection 

DBMAX 

0. 

Maximum  dB  for  plotting  frequency  response 

DBMIN 

0. 

Minimum  dB  for  plotting  frequency  response 
(Auto,  scaling  if  DBMIN=DBMAX) 

DEGMN 

-360. 

Minimum  defined  phase  in  frequency  response  (Phase  defined  from 
DEGMN  to  DEGMN+360.) 

DELAY 

0. 

Delay  time  for  sampled-data  transform  -  (sec.) 

ECREl 

2.E-4 

Tolerance  for  common  root  in  common  root  elimination  in  subroutine 

CRELIM 

ECRE2 

l.E-8 

Tolerance  for  zero  root  in  subroutine  CRELIM 

EDBl 

1. 

Min.  delta  dB  in  frequency  response  for  plotting 

EDE2 

2. 

Min.  delta  dB  in  frequency  response  for  printout 

EDEG1 

4. 

Max.  delta  degree  in  frequency  response  for  plotting 

EDEG2 

10. 

Max.  delta  degree  in  frequency  response  for  printout 

EPADl 

l.E-10 

Tolerance  for  negligible  higher  order  coefficients  in  commands  PADD, 
PSUB,  SPADD,  SPSUB,  WPADD,  WPSUB,  ZPADD,  ZPSUB 

EPl 

l.E-8 

An  input  quantity  in  subroutine  MULE 

EP2 

l.E-6 

An  input  quantity  in  subroutine  MULE 

EP3 

.01 

An  input  quantity  in  subroutine  MULE 

EP4 

l.E-8 

An  input  quantity  in  subroutine  MULE 
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Param. 

Preset 

Description 

EP5 

l.E-5 

An  input  quantity  in  subroutine  MULE 

ERCNJ 

l.E- 1 

Tolerance  for  zero  root  in  subroutine  CRELIM 

ERCX 

1.E4 

Roots  are  considered  to  be  complex  if  |imag/real|  .GT.  ERCX 

ERCZ 

l.E-5 

Roots  are  considered  to  be  zero  if  CABS. LT. ERCZ 

FAUTO 

1 

.NE.O  for  automatic  frequency  point  selection.  Uses  NOMEGA  and 
array  OMEGA. 

.EQ.O  for  user  supplied  frequency  points.  Uses  arrays  FREQl, 
FREQ2,  ...,  FREQ5. 

FBODE 

1 

.NE.O  for  Bode  plot  with  frequency  response  commands 

FDELAY 

0. 

Time  delay  (dead  time)  for  use  with  s  plane  frequency  response 

FNICO 

0 

.NE.O  for  Nichols  plot  with  frequency  response  commands 

FNYQS 

0 

.NE.O  for  Nyquist  plot  with  frequency  response  commands 

FREQl(l) 

1. 

Starting  freq.  point  for  first  segment  of  user  specified  values 
(when  FAUTO=0).  (units  determined  by  RAD) 

FREQ1(2) 

10. 

End  freq.  point  for  first  segment  of  user  specified  values 
(when  FAUTO=0). 

FREQ1(3) 

1. 

Delta  frequency  for  first  segment  of  user  specified  values 
(when  FAUTO-0). 

FREQk(l) 

0. 

Starting  freq.  point  for  k-th  segment  of  user  specified  values 
(when  FAUTO=0).  k=2,5 

FREQk(2) 

0. 

End  freq.  point  for  k-th  segment  of  user  specified  values 
(when  FAUTO=0).  k=2,5 

FREQk(3) 

0. 

Delta  frequency  for  k-th  segment  of  user  specified  values 
(when  FAUTO=0).  k=2,5 

FXYDEL 

.5 

Nyquist  plot  scale  in  units  per  inch.  (Auto  scaling  if  FXYDL=0) 

FXYMIN 

-2.5 

Nyquist  plot  parameter  -  minimum  real  and  imag.  value  plotted 

GRAFP 

1 

.NE.O  for  low  resolution  printer  plots 

HRDCPY 

0 

.NE.O  for  high  resolution  electrostatic  plots 

ITLOC 

50 

Max  number  of  different  gains  computed  in  root  locus 

KDELT 

1.E4 

Value  for  changing  root  locus  gains  (preset  to  large  value  so  that 
no  additional  gains  are  computed). 

KFLG 

1 

Flag  for  computing  root  locus  gains 

.EQ.O  to  increment  gain  by  multiplying  by  KDELT 

.NE.O  to  increment  gain  by  adding  by  KDELT 

KGAIN 

Array  of  root  locus  gains 

.5 

KGAJN(l)  —  first  user-specified  root  locus  gain 

2. 

KGAIN(2)  =  second  user-specified  root  locus  gain 

KGAIN(NLOCI)  =  last  user-specified  root  locus  gain. 

(Gains  computed  and  used  only  if  they  are  between  KGAIN(l) 
and  KGAIN(NLOCI)  ) 

KNORM 

1. 

Value  used  for  normalizing  a  transfer  function  with  commands 
SNORM,  WNORM,  or  ZNORM 

MAXDW 

.2 

Max.  relative  frequency  step  size  in  frequency  response  when 
FAUTO. NE.O 
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Param. 

Preset 

Description 

MAXIT 

80 

Max  number  of  iterations  allowed  per  root  in  subroutine  MULE 

MAXITF 

3000 

Max.  number  of  iterations  in  auto,  mode  of  frequency  response 

MDEG 

0 

Degree  of  highest  order  polynomial  in  matrices  M0,  ...,  M4  (0-4) 

MINDW 

.0005 

Min.  relative  frequency  step  size  in  frequency  response  when 
FAUTO.NE.O 

MXM 

1 

Order  of  matrices  M0,  Ml,  M2,  M3,  and  M4 

MO 

0. 

Matrix  for  coefficients  of  s°  term  of  M(s)  used  by  commands 
DETRM  and  DTERM 

Ml 

0. 

Matrix  for  coefficients  of  s1  term  of  M(s)  used  by  commands 
DETRM  and  DTERM 

M2 

0. 

Matrix  for  coefficients  of  s2  term  of  M(s)  used  by  commands 
DTERM  and  DTERM 

M3 

0. 

Matrix  for  coefficients  of  s3  term  of  M(s)  used  by  commands 
DETRM  and  DTERM 

M4 

0. 

Matrix  for  coefficients  of  s4  term  of  M(s)  used  by  commands 
DETRM  and  DTERM 

NANOT 

4 

Number  of  lines  of  annotations  on  hardcopy  plots  (0-4) 

NLOCI 

2 

Number  of  root  locus  gains  entered  in  array  KGAIN  (2  -  25) 

NOMEGA 

2 

Number  of  preselected  frequency  points  in  array  OMEGA  for  use  in 
auto,  frequency  mode.  (2  -  20) 

NP 

2 

Flag  for  determining  output  from  subroutine  MULE 

.EQ.O  -  print  all  iterants  and  BCI  output  for  special  procedures 

.EQ.l  -  print  only  the  final  iteration  of  each  root 

.EQ.2  -  suppress  all  internal  printing 

(note  -  program  always  print  final  iteration  if  max  iteration  reached 

NQDB 

0 

.NE.O  for  hardcopy  Nyquist  plot  in  dB  when  used  with  FNYQS 

NRMHI 

0 

Transfer  function  normalization  flag,  used  with  SNORM,  WNORM, 
ZNORM 

.EQ.O  for  normalizing  to  the  low  order  nonzero  coefficient 
.NE.O  for  normalizing  to  the  high  order  coefficient 

NTGER 

1 

Integer  n  for  multirate  configuration 

OMEGA 

Array  of  pre-selected  frequency  points  for  auto,  frequency  mode, 
(units  determined  by  RAD) 

1. 

OMEGA(l)  =  first  frequency  point  used  in  auto,  mode 

10. 

OMEGA(2)  -  second  frequency  point  used  in  auto,  mode 

OMEGA(NOMEGA)  =  last  frequency  point  used  in  auto,  mode 

PMARG 

0 

.NE.O  for  plotting  phase  margin  instead  of  phase  for  the  Nichols  plot 

POLYP 

0. 

Array  used  to  input  coefficients  for  polynomials 

POLYD 

0. 

Array  used  to  input  denominator  coefficients  for  transfer  functions 

POLYN 

0. 

Array  used  to  input  numerator  coefficients  for  transfer  functions 

PRNFLGl 

1 

(not  used) 

PRNFLG2 

1 

.EQ.O  to  suppress  printout  of  arguments  of  an  LCAP2  command 

PRNFLG3 

1 

.EQ.O  to  suppress  printout  of  an  LCAP2  command 

PRNFLG4 

1 

.EQ.O  to  suppress  printout  of  results  of  an  LCAP2  command 
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Param. 


Preset 


Description 


PRNFLG5 

1 

(not  used) 

PRNMTRX 

0 

.EQ.O  for  suppressing  printout  of  state  space  matrices  computed 
by  commands  BlEIG,  BlFREQ,  BlLOCI,  BlTF,  B2EIG,  B2FREQ, 
B2LOCI,  and  B2TF 

.EQ.l  for  printout  of  state  space  matrices 
.EQ.2  above  plus  intermediate  matrices 

PRNl 

0 

.EQ.O  for  suppressing  printout  from  CRELIM 

PRN2 

0 

.EQ.O  for  suppressing  printout  from  — 

PRN3 

0 

.EQ.O  for  suppressing  printout  from  RCLAS 

PRN4 

0 

.EQ.O  for  suppressing  printout  from  RESDU 

PRN5 

0 

.Eq.u  for  suppressing  printout  from  — 

PRN6 

0 

.EQ.O  for  suppressing  printout  from  WTRANS 

PRN7 

0 

.EQ.O  for  suppressing  printout  from  PROOT  and  MROOTl 

PRN8 

0 

.EQ.O  for  suppressing  printout  from  — 

PRN9 

0 

.EQ.O  for  suppressing  printout  from  QRRTS  and  QZRTS 

RAD 

1 

.NE.O  for  rad/sec,  otherwise  Hz 

RLFLGl 

1 

Flag  for  numbering  root  locus  points  on  hardcopy  plots 
.EQ.l  for  numbering;  .EQ.-l  for  no  numbering 

RLXMAX 

0. 

Max.  x  axis  for  plotting  with  root  locus  commands 

RLXMIN 

0. 

Min.  x  axis  for  plotting  with  root  locus  commands 
(Auto,  scaling  if  RLXMIN=RLXMAX) 

RLYMAX 

0. 

Max.  y  axis  for  plotting  with  root  locus  commands 

RLYMIN 

0. 

Min.  y  axis  for  plotting  with  root  locus  commands 
(Auto,  scaling  if  RLYMIN = RLYMAX) 

ROOTP 

0. 

Complex  array  used  to  input  roots  into  polynomials 

ROOTD 

0. 

Complex  array  used  to  input  denominator  roots  into  transfer  functions 

ROOTN 

0. 

Complex  array  used  to  input  numerator  roots  into  transfer  functions 

RTMAX 

1.E7 

Max.  root  to  be  found  by  subroutine  MULE 

RZERO 

l.E-5 

Roots  .LT.  RZERO  returned  from  subroutine  MULE  are  set  to  0. 

SAMPT 

1. 

Sampling  period  (sec.) 

SHADE 

16 

Plot  intensity  of  hardcopy  plot  (2  -  28) 

TDELT 

1. 

Delta  time  for  s-plane  time  response 

TEND 

1. 

End  time  for  time  response  calculation 

TMAGN 

1. 

Magnitude  of  input  for  time  response  calculation 

TTYPE 

1 

.EQ.O  for  impulse  response;  .EQ.l  for  step  response 

TXMAX 

0. 

Maximum  x  axis  for  plotting  with  time  response  commands 

TXMIN 

0. 

Minimum  x  axis  for  plotting  with  time  response  commands 
(auto  scaling  of  x  axis  if  TXMIN=TXMAX) 

TYMAX 

0. 

Maximum  y  axis  for  plotting  with  time  response  commands 

TYMIN 

0. 

Minimum  y  axis  for  plotting  with  time  response  commands 
(auto  scaling  of  y  axis  if  TYMIN=TYMAX) 

TZERO 

0. 

Start  time  for  evaluating  s  plane  time  response 

UCIN 

0 

C;  block  number  where  input  u  is  connected  to  (see  commands  BlFREQ 
and  BlTF) 

UDIN 

0 

D;  block  number  where  input  u  is  connected  to  (see  commands  B2FREQ 
and  B2TF) 
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Param.  Preset  Description 

UMAGN  1.  Magnitude  of  the  input  into  block  C;  or  D; 

(see  commands  BlFREQ,  BlTF,  B2FREQ,  and  B2TF) 

XGAP  500  Plot  “pen”  lifts  up  when  delta  x  distance  exceeds  XGAP*(.01)  inches 

XLINES  52  Number  of  printer  lines  used  for  low  resolution  printer  plots 

XNCOL  103  Number  of  characters  used  in  horizontal  direction  for  printer 

plots  (73  or  103) 

XLINES  52  Number  of  printer  lines  used  for  low  resolution  printer  plots 

XNCOL  103  Number  of  characters  used  in  horizontal  direction  for  printer 

plots  (73  or  103) 

YANOT  9.6  Y  position  for  second  line  of  hardcopy  plot  annotation  -  (in.) 

(range  is  0-10) 

YCOUT  0  Ci  block  number  defining  the  output  for  commands  BlFREQ  and  BlTF 

YDOUT  0  D;  block  number  defining  the  output  for  commands  B2FREQ  and  B°TF 

YGAP  500  Plot  “pen”  lifts  up  when  delta  y  distance  exceeds  YGAP*(.0l)  inche 

ZLINE  19  Plot  intensity  for  accenting  zero  axis,  normal  =  16 

ZOH  1  .NE.O  to  include  zero-order  hold  in  computation  of  sampled-data  transform 

.EQ.O  to  exclude  zero-order  hold 
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Appendix  C 


Mathematical  Techniques 

C.l  Root  Finding 


The  Aerospace  MULE  [9]  general  root  finding  subroutine  is  used  to  solve  roots  of  polynomials 
and  determinants  of  polynomial  matrices.  In  the  abstract  of  Ref.  9,  MULE  is  described  as:  “An 
improved  version  of  Muller’s  method  has  been  combined  with  Aitken’s  delta  square  extrapolation, 
an  automatic  scaling  procedure,  and  a  simple  but  efficient  searching  technique  to  provide  a  general 
purpose  FORTRAN  subroutine  for  the  calculation  of  zeros  of  arbitrary  functions  (i.e.,  F(z)  =  0.) 
using  arbitrary  guesses.  Most  of  the  fundamental  problems  related  to  finding  zeros  of  arbitrary 
functions  such  as  determining  initial  guesses,  convergence  of  roots,  relative  zero,  absolute  zero,  0/0, 
multiple  roots,  multiple  roots  at  the  origin  as  well  as  preventing  overflows  and  underflows  have 
been  resolved  in  a  satisfactory  manner . ” 

The  description  of  MULE  provided  below  is  intended  to  outline  techniques  and  features  which  are 
used  by  LCAP2.  Specific  numerical  techniques  such  as  extrapolation,  scaling,  and  searching  will 
not  be  covered. 


The  roots  of  an  arbitrary  function  F(z)  are  found  by  iteration.  This  function  can  be  written  in 
product  form  as, 

n 

F(z)  =  kY;(Z  -  *i)  (C-!) 

«'=  I 

where  z ;  are  the  roots  to  be  found,  n  is  the  number  of  roots,  and  k  is  a  constant. 

To  find  the  first  root,  MULE  uses  F(z)  directly  to  determine  the  iterants.  To  find  the  remaining 
roots,  MULE  uses  the  deflated  function. 


Fr(z) 


Fjz) 

-  a) 


(C.2) 


to  determine  the  iterants.  The  index  r  is  the  number  of  the  current  root  to  be  determined.  Since 
Fr(z)  is  the  original  function  with  previously  computed  roots  factored  out,  functions  with  multiple 
roots  or  close  roots  can  be  more  accurately  determined  by  this  technique. 

The  MULE  subroutine  provides  for  numerous  options  and  error  criteria.  Options  have  been  selected 
to  provide  the  following: 
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•  The  user  does  not  have  to  provide  initial  guesses  for  the  roots. 

•  Automatic  scaling  internal  to  MULE  is  provided  to  handle  most  problems  where  the  roots 
are  in  the  range  of  l.E-35  <  |  z,-  |  <  1.E35. 

•  The  maximum  number  of  iterations  is  determined  bv  the  parameter  MAXIT  which  is  preset 
to  80.  When  all  the  roots  of  a  function  cannot  be  found,  increasing  this  parameter  may  help 
in  some  cases. 

•  No  printout  of  each  iteration  is  provided;  however,  the  user  can  request  this  option  by  changing 
the  value  of  NP  which  is  described  in  Appendix  B. 

•  After  all  roots  have  been  found,  the  routine  may  take  a  second  pass  to  recompute  the  roots 
again  to  improve  their  accuracy.  This  occurs  if  any  of  the  roots  required  the  maximum 
number  of  iterations  (each  root  max  iterated  will  always  be  printed  out).  If  a  second  pass 
is  required,  the  ordering  of  the  roots  from  the  first  pass  is  reversed  and  used  as  guesses  for 
the  second  pass.  If  all  roots  are  then  successfully  found  on  the  second  pass,  the  comment 
“IGNORE  ABOVE  WARNING  MESSAGE.  ALL  ROOTS  WERE  FOUND  ON  THE  2ND 
PASS”  will  be  printed  out,  otherwise,  the  comment  “...OF  THE  ABOVE  ROOTS  WERE 
NOT  FOUND  ON  THE  2ND  PASS  TO  DESIRED  PRECISION”  will  be  printed  instead. 

•  Complex  roots  are  found  in  pairs  since  the  routine  automatically  uses  the  conjugate  of  a  root 
as  the  next  guess  if  a  complex  root  is  found. 

One  of  the  arguments  in  the  call  to  subroutine  MULE  is  the  maximum  number  of  roots  to  be 
found.  When  the  number  of  roots  found  by  MULE  reaches  this  value,  the  root  searching  procedure 
is  terminated.  For  functions  in  which  the  number  of  roots  are  known  this  value  is  used  for  the 
maximum  number  of  roots  to  be  found.  For  functions  in  which  the  number  of  roots  are  not  known, 
an  upper  limit  is  used  for  the  value  of  the  maximum  number  of  roots  to  be  found  and  the  technique 
described  below  is  used  to  find  the  exact  number  of  roots. 

The  searching  technique  used  to  find  a  root  starts  at  or  near  the  origin  and  proceeds  away  from  the 
origin  until  it  finds  a  root.  Since  Fr(z)  instead  of  F(z)  is  used  to  determine  the  iterants,  Fr(z)  will 
become  a  constant  after  all  the  roots  have  been  found.  This  fact  is  used  to  terminate  the  root  finding 
procedure.  After  the  nt/l  root  of  F(z)  is  found  MULE  will  try  to  find  another  root.  However,  since 
Fr(z)  is  now  a  constant,  the  searching  technique  will  select  iterants  of  successively  larger  values. 
Although  the  exact  method  of  terminating  the  root  finding  procedure  is  more  complex,  suffice  to 
state  that  when  the  iterants  exceeds  a  fixed  value,  all  roots  are  considered  to  be  found.  This  fixed 
value  is  RTMAX  which  is  preset  to  1.0E7.  The  user  can  change  this  value. 

As  stated  above  MULE  is  used  to  solve  roots  of  polynomials  and  determinants  of  polynomial 
matrices.  Since  MULE  is  a  general  subroutine  requiring  a  separate  auxiliary  subroutine  to  evaluate 
F(z),  subroutines  PROOT  and  MROOTl  are  used  to  call  subroutine  MULE  to  find,  respectively, 
roots  of  polynomials  and  determinants  of  polynomial  matrices. 

C.1.1  PROOT 

In  PROOT  the  maximum  number  of  roots  to  be  found  by  MULE  is  set  equal  to  the  degree  of  the 
polynomial.  After  MULE  computes  all  the  roots  of  the  polynomial  a  check  is  made  for  negligible 
roots.  If  the  absolute  value  of  any  of  these  roots  is  less  than  RZERO  (preset  to  l.E-5)  they  will  be 
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set  to  zero.  There  is  no  specific  ordering  of  the  roots  determined  by  MULE  except  that  the  complex 
roots  are  found  in  pairs.  However,  since  a  format  for  ordering  these  roots  is  defined  in  Sect  ion  C.7 
to  provide  a  systematic  development  of  routines  utilizing  root  arrays,  the  routine  RCLAS  is  called 
to  reorder  or  to  classify  these  roots.  When  the  roots  of  a  polynomial  are  found,  the  order  in  which 
tliev  are  listed  in  the  printout  will  generally  not  be  in  the  same  order  in  which  they  are  found. 

LCAP2  commands  which  uses  subroutine  PROOT  include  PRTS,  SPRTS,  WPRTS,  ZPRTS,  SWXFM, 
SZXFM,  SWMRX,  SZMRX,  and  STIME. 

C.1.2  MROOTl 

Subroutine  MROOTl  is  used  to  compute  the  determinant  of  matrix  M(s)  in  which  the  elements 
are  polynomials.  This  matrix  is  represented  in  LCAP2  by 

M  (s)  =  M4s*  +  M3s3  +  M2s2  +  M  Is1  +  MO  (C.3) 

where  MO,  Ml,  M2,  M3,  and  M4  are  defined  in  Section  2.6. 

Since  the  number  of  roots  of  the  determinant  of  M(s)  cannot  be  determined  by  inspection,  the 
argument  in  the  call  to  subroutine  MULE  for  specifying  the  maximum  number  of  roots  to  be  found 
is  set  equal  to  MXPDEG1,  the  maximum  number  of  roots  that  can  be  stored  in  LCAP2.  If  there 
are  more  than  MXPDEG  roots  only  the  first  MXPDEG  will  be  found  and  an  error  message  will  be 
printed  out.  The  roots  found  by  MULE,  as  in  PROOT,  will  be  compared  with  RZERO  (preset  to 
l.E-7)  to  determine  if  there  are  any  negligible  roots.  Any  roots  whose  absolute  value  is  less  than 
RZERO  will  be  set  to  zero.  Also,  the  roots  will  be  reordered  or  reclassified  by  the  routine  RCLAS. 

Finding  the  roots  of  the  determinant  does  not  complete  the  evaluation  of  the  determinant  of  a 
polynomial  matrix.  The  gain  associated  with  the  roots  must  be  determined.  Since  the  root  form 
representation 


GAIN  s'1  £(  —  +  1)  (C.4) 

i= t 

where  fi  =  number  of  roots  at  the  origin,  as  defined  in  Section  6.1.2,  is  used  by  LCAP2  instead  of 
(C.l),  the  gain  GAIN,  which  is  also  the  low  order  nonzero  coefficient  of  the  polynomial,  is  given  by 


GAIN  = 


EM 

*!£?(-*:  +  1) 


z^Zi  (i=l,n) 


(C.5) 


The  z  used  to  evaluate  this  expression  is  determined  by  initially  using  (0.5  +  jO.)  and,  successively, 
if  necessary,  adding  (.1  +  jO.)  to  this  value  until  a  z  is  found  which  is  different  from  any  of  the 
roots.  Since  both  root  and  coefficient  form  representations  of  polynomials  are  used  in  LCAP2,  after 
the  roots  of  the  determinant  are  found,  the  coefficients  of  the  polynomials  will  be  computed  from 
the  roots  and  the  low  order  nonzero  coefficient.  In  the  printout  of  the  determinant  the  roots  of  the 
determinant  will  be  printed  out  first  along  with  the  low  order  nonzero  coefficient.  This  will  then 
be  followed  by  the  coefficients  of  the  polynomial. 

'MXPDEG  cannot  be  changed  by  the  user.  A  new  object  and  binary  library  has  to  be  created  for  each  different 
value  of  MXPDEG. 
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This  method  of  evaluating  the  determinant  by  finding  the  roots  first  as  opposed  to  finding  the 
coefficients  of  the  polynomial  first  is  inherently  more  accurate. 

LCAP2  commands  which  uses  subroutine  MROOTl  are  DETRM  and  DTERM. 


C.2  Eigenvalues  and  Generalized  Eigenvalues 

Computation  of  eigenvalues  and  generalized  eigenvalues  are  used  by  commands  BlEIG,  BlLOCI, 
BlTF,  B2EIG,  B2LOCI,  and  B2TF.  For  a  system  represented  in  state  space  form, 


x  =  ax  +  bu 

y  =  cx  +  du  (C.6) 


the  eigenvalues  of  the  system  are  computed  by  solving  for  the  nonzero  solution  of 


ax  =  Ax 


(C.7) 


or  equivalently  (with  A  replaced  by  s), 


det  [si  -  a]  =  0  (C.8) 

For  SISO  transfer  function  evaluation,  the  transfer  function  from  input  u  to  output  y j  is  given  by, 


Yj(s) 

u(s) 


det 


det 


si  -  a  b 

row  j  of  -c  row  j  of  d 


si  -  a 


(C.9) 


Computation  of  the  poles  of  the  transfer  function  is  identical  to  the  eigenvalue  problem  of  (C.8). 
The  zeros  of  the  the  transfer  function  is  computed  by  solving  for  the  nonzero  solution  (generalized 
eigenvalues)  of 


Ax  =  ABx 


(C.10) 


where, 


A 


a  -b 

row  j  of  c  row  j  of  —  A 


B 


I  0 
0  0 
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or  equivalently  (with  A  replaced  by  s), 


det  [sB  —  A]  =  0  (C.ll) 

The  eigenvalues  of  (C.8)  are  computed  by  the  QR  method  using  driver  subroutine  EIGVAL  from 
NASA/GODDARD  Space  Flight  Center’s  SAMSAN  [10]  library  of  code  for  control  system  analysis 
and  simulation.  This  routine  in  turn  calls  subroutines  BALANC,  HQR,  and  ORTHES  which  are 
from  EISPACK  [11].  After  the  eigenvalues  are  computed,  the  “gain”  associated  with  these  eigen¬ 
values  is  computed  so  that  the  coefficient  form  of  the  characteristic  polynomial  can  be  computed1. 
Next,  subroutine  QRDRTS  is  called  to  check  if  the  absolute  value  of  any  of  the  eigenvalues  is  less 
than  RZERO  (preset  to  l.E-5).  If  any  are  found,  they  are  set  to  zero.  Also  checks  are  made  on 
complex  roots  to  determine  if  the  ratios  of  either  (real/imagj  or  |imag/reali  are  greater  than  F.RCX 
(preset  to  1.E4).  If  any  are  found,  the  negligible  part  is  set  to  zero.  The  calls  to  subroutines 
EIGVAL  and  QRDRTS  are  in  subroutine  EIGQR. 

The  generalized  eigenvalues  of  (C.ll)  are  computed  by  the  QZ  method  using  driver  subroutine 
EZGVAL  from  the  SAMSAN  library.  This  routine  in  turn  calls  subroutines  BALGEN,  QZHES, 
QZIT,  and  QZVAL.  BALGEN  is  from  the  SAMSAN  library  while  QZHES,  QZIT,  and  QZVAL  are 
from  EISPACK.  The  QZ  method  does  not  compute  the  eigenvalues  directly  nor  return  the  number 
of  eigenvalues.  It  computes  (from  EZGVAL)  an  n  element  complex  array  ALPHA  and  an  n  element 
real  array  BETA,  where  n  is  equal  to  the  order  of  matrices  A  and  B.  An  eigenvalue  is  defined  from 
the  ratio 


ALPHA(i)/BETA(i)  for  BETA(i)  ^  0. 

For  an  infinite  precision  machine,  the  number  of  eigen values  will  be  equal  to  n  minus  the  number 
of  BETA(i)’s  which  are  equal  to  zero.  In  practice,  the  number  of  eigenvalues  will  be  computed  as 
n  minus  the  number  of  “oo”  eigenvalues,  where  “oo”  is  defined  when 


•  BETA(i)=0. 

•  CABS(ALPHA(i)/BETA(i)).GT.RTMAX 


This  calculation  is  performed  in  subroutine  QZDRTS.  Like  subroutine  QRDRTS,  this  routine  will 
also  set  negligible  eigenvalues  to  zero  if  the  absolute  value  is  less  than  RZERO.  It  will  also  set 
negligible  imaginary  or  real  parts  of  complex  eigenvalues  to  zero  if  either  |real/imag|  or  |imag/real| 
are  greater  than  ERCX.  The  calls  to  subroutines  EZGVAL  and  QZDRTS  are  in  subroutine  EIGQZ. 


C.3  Partial  Fraction  Expansion 


The  partial  fraction  expansion  of  a  rational  function  is  used  in  determining  both  the  inverse  Laplace 
transform  and  the  sampled-data  transform.  The  particular  expansion  used  by  LCAP2  requires  that 
there  be  no  nonzero  multiple  poles  and  the  number  of  numerator  roots  does  not  exceed  the  number 
of  nonzero  denominator  roots.  For  most  physical  systems  these  constraints  can  be  easily  met.  If  the 
system  has  multiple  poles  not  at  the  origin,  they  may  be  represented  by  separate  poles  displaced 

1  Srr  (C.4) 
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from  each  other  by  a  slight  amount  without  appreciably  affecting  the  results.  Most  physical  systems, 
when  properly  modeled,  will  not  have  more  zeros  than  poles. 

For  a  rational  function  satisfying  the  above  constraints,  the  function  can  be  expressed  in  factored 
form  as 


where, 


G(s)  =  Kyil 


(C.  12) 


q  =  number  of  numerator  roots 
H  ~  number  of  poles  at  the  origin 
p  =  number  of  nonzero  poles 
Kr£,  =  is  the  root  locus  gain 


The  partial  fraction  expansion  of  G(s)  is  given  by 


p  »  p 

cm-eS  +  E 


i=i 


i=i 


where  A;  and  n  are  given  by 


7. 


EU(bi-aj) 


p 

A{  —  K RL^pq^in  ~  ^  7 j  1  _  t  ^  fi 

j=  1 


(C.13) 


(C.14) 


(C.15) 


and  6pq  is  the  Kroneker  6  function. 


C.4  Inverse  Laplace  Transformation  and  Time  Response 


The  inverse  Laplace  transform  is  evaluated  by  the  partial  fraction  expansion  method.  For  rational 
functions  satisfying  the  constraints  stated  in  Section  C.3,  the  Laplace  transform  can  be  expressed 
in  partial  fraction  form  as 


where, 


»=1  t  —  1 


(C.16) 
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/r  =  number  of  poles  at  the  origin 

p  =  number  of  nonzero  poles 

A,  and  7 x  are  defined  by  (C.15)  and  (C.14). 

Separating  the  last  term  of  (C.16)  into  the  contribution  for  complex  and  real  roots,  G(s)  becomes, 


G(s)  =  £ 


A, 

s' 


Ql,3  +  Qpj 

s2  4-  0us  +  3oi 


p 

+  Z 

t'=2r  +  l 


7. 

s  -  b{ 


(C.17) 


where, 


r  =  number  of  pairs  of  complex  poles 

q0i  =  -2[Re{72i_i}  Re{b2t-i}  +  Im{72,_i}  ImfR^!}] 

Q  ii  =  2Re{72,_x} 

/hi  =  |b2t-a!2 
3u  =  -2Re{b2{_x} 


Inverse  transforming  (C.17)  into  the  time  domain, 

g(t)  =  FITTi  t'1  +  Yl[QucoaLJit  +  —  Sinu)t t}e~c‘t  +  7,eM  (C.18) 

»=1  I*  «  =  1  U,‘  t  =  2r  + 1 


where, 


c,  =  3u/2 
=  [/hi  -  cfj,/2 

Pi  —  &0i  '  CtliG 


C.5  Single  Rate  Sampled-Data  Transforms 


The  z  plane  and  the  w  plane  sampled-data  transform  of  the  system  given  by  Figure  C.l  is  computed 
by  the  partial  fraction  method  [12,13]  to  yield  a  rational  function. 


y*(0 


Zero-order  Delay  Plant 
hold 


Figure  C.l:  Continuous  System  with  Sampling 

Using  classical  z  transform  theory,  the  simplest  method  for  computing  a  z  transform  is  to  (1) 
perform  a  partial  fraction  expansion  of  the  continuous  system  and  (2)  compute  the  z  transform 
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for  each  of  the  individual  terms.  In  this  unrationalized  form,  a  z  plane  frequency  response  can  be 
accurately  evaluated.  If  only  frequency  responses  are  to  be  computed,  this  form  of  the  z  transform  is 
sufficient.  However,  the  rationalized  form  is  usually  desired  since  both  the  roots  and  the  coefficients 
of  the  numerator  and  denominator  are  necessary  for  analysis  using  the  block  diagram  reduction 
method.  It  is  in  rationalizing  this  sum  of  z  transforms  that  the  numerator  roots  and  the  coefficients 
of  the  transfer  function  will  be  subject  to  severe  loss  of  accuracy  when  the  order  of  the  system  is 
not  small.  This  inherent  inaccuracy,  due  to  the  mapping  of  all  poles  close  to  the  origin  in  the  s 
plane  into  the  region  of  z  ~  1,  can  be  minimized  by  performing  all  possible  calculations  in  the  w 
plane  as  defined  by  he  bilinear  transformation 


w 


Z  -  1 
Z  - hi 


(C.19) 


Consider  the  system  in  Figure  C.l.  The  transfer  function  between  z*(t)  and  y*(t)  is  given  by 


1  -  e--r(.-0 


(C.20) 


For  the  general  case  of  time  delays  greater  than  one  sampling  period,  it  is  convenient  to  define 
quantities  k  and  A  as  follows: 

d  -  (k  -  A )T  where  k  is  an  integer  such  that  k  -  1  <  d/T  <  k,  0  <  A  <  1  (C.21) 

Substituting  (C.21)  into  (C.20)  yields 


(C.22) 


Once  again,  restricting  G(s)  as  in  (C.13),  the  partial  fraction  expansion  of  G(()/£  can  be  expressed 
in  partial  fraction  form  and  substituted  into  (C.22)  to  give 


{  e«-<  Hi-C  £;&-&) 


(C.23) 


Evaluating  the  above  integral  and  letting  z  —  eT>  and  fit  -  eb,T, 


H(z)  =  Z[H*(»)}  = 


z  — 


-)(«-*) 


*i+i 


x  zPi(z)  ,  Y'  2 


i  =  l 


Z  -  0i 


(C.24) 


where 


Pi(*)  =  1 

AW  =  t(a+7^) 


C  -  8 


'  .  T2  A  2  2A  +  1  2 

p3<*>  =  2!“  [A  +  T^r  +  (7^Tj5 


1  2  —  1  ,  3*  1  ZC 

- - r; - lim(-l)1  1  —  - 

(i  -  1)!  z  a-.tr  da'~l  z  —  e~ 


Simplifying  the  right  side  of  (C.24)  gives 


H(z)  =  zk  £**(*) +  J 

t=i  i= l  2  Pl 


(C.25) 


Transforming  from  the  z  to  the  w  plane,  using  the  bilinear  transformation  z  =  (1  +  m)/(l  -  u>) 
produces 


=  W{tf(z)} 


i  _  k  r^1  p 

rjrd  E^w+E2^ 

T  '  |_t=i  »=i 


™(1  +  ft)  +  (1  -  ft) 


(C.26) 


where 


pi(™) 

P3{w) 


=  T  A  + 


1  -  u>\ 
2w  ) 


2  /l  +  (2A  +  l)u>  +  [2A(A  -  1)]mj2 
\  4u;2 


j>,M  =  '  ' 

(t  —  1)!  1  +  w  (a-»<r  9a,_1 


e  oAT(l  -  tu) 
tu(l  +  e~aT)  +  (1  -  e~aT) 


Separating  the  complex  poles  from  the  nonzero  real  poles  in  the  second  summation  term  of  (C.26) 
and  defining  new  parameters  results  in  the  final  form 


fw=(TJ!T J !>«(.)+.  E  *g±fe—  +  E  -r5^- 

\  1  +  W )  1  “  4>3iW2  +  <t>4iW  +  <t>Si  i=“+  J  tfo.  +  ^3. 


(C.27) 


where  r  =  number  of  complex  root  pairs  and 
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4>n 

=  4Re{72l-,/32At_,(l 

<t>2  i 

H 

1 

<Jc5 

i 

CM 

CcJ 

II 

1 

*  CM 

i 

4>3i 

—  1  +  2Re{/32i_i}+ 

1  &2i  1  |2 

$4i 

=  2(1-  \02i-i  I2) 

$5  i 

—  1  -  2Re{/32i~i}  + 

1  02i- 1  |2 

4>u 

=  272i_j/3^_1 

*J>2  i 

=  1  +  02i-\ 

^31 

=  1  “  fci-l 

F(w)  is  now  expressed  as  a  sum  of  polynomials  with  real  coefficients.  These  terms  are  then  summed 
to  yield  a  rationalized  form  of  F(w).  Subroutine  PROOT  is  then  used  to  find  the  roots  of  the 
resulting  numerator  polynomial  to  yield  the  zeros  of  .F(VF). 

The  w  plane  transform  command  SWXFM  is  implemented  using  the  procedure  described  above. 
When  the  z  plane  transform  command  SZXFM  is  implemented,  the  same  code  is  used  to  first 
compute  a  w  transform.  The  w  plane  zeros  and  poles  are  then  transformed  to  the  z  plane  using 
the  bilinear  transform.  The  z  plane  coefficients  are  computed  using  the  z  plane  roots.  For  higher 
order  transfer  functions  the  z  plane  coefficients  cannot  be  accurately  represented  by  a  computer 
unless  multi-length  words  are  used1.  A  frequency  response  of  a  z  plane  transfer  function  computed 
directly  from  a  SZXFM  command  will  not  be  subject  to  the  type  of  errors  described  above  since  it 
will  use  the  roots  instead  of  the  coefficients  of  the  transfer  function  in  computing  the  response. 

C.6  Multirate  Sampled-Data  Transforms 


Three  basic  types  of  multirate  sampled-data  transforms  are  implemented  by  LCAP2.  Each  of 
these  types  will  apply  only  for  the  case  where  the  ratios  of  the  sampling  periods  or  sampling  rates 
are  related  by  an  integer.  First  the  notation  used  for  representing  multirate  transforms  will  be 
presented.  The  z  transform  of  the  slowest  sampler  will  be  denoted  by  T  so  that  the  z  transform  of 
a  continuous  transform  G(s )  is  denoted  by 

Zt{G{s)}  =  GT(z)  (C.28) 

If  G(s)  is  sampled  at  a  rate  n  (an  integer)  times  faster,  the  faster  rate  z  transform  of  G(s)  is  denoted 
by 


ZT/n{G{s)}  =  GT/n{zn )  (C.29) 

where  zn  =  (z)1/,n  since  z  -  e‘T  and  zn  =  e*r/n. 

‘This  is  the  reason  why  block  diagram  algebra  with  z  plane  transfer  functions  is  subject  to  computational  errors 
for  higher  order  systems.  Although  multi-length  words  can  be  used  to  accurately  represent  coefficients  to  some 
predefined  accuracy,  it  is  not  practical  to  develop  software  which  will  handle  multi-length  words  greater  than  2 
words,  i.e.,  DOUBLE  PRECISION  in  FORTRAN. 
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The  first  type  of  multirate  transform  is  the  slov.-to-fast  multirate  transform  which  describes  the 
input-output  relationship  of  the  system  in  Figure  C.2 


ET(z)  , _ _  CT/,n(zn) 


-Zr/n{G(s)} 


Figure  C.2:  Slow-to-Fast  Multirate  System 
The  output  of  this  system  is  given  by 


CT/n(zn)  =  ZT/n{G{s)}  *  ET(z)  (C.30) 

If  G(s)  is  only  a  continuous  function  (i.e.,  no  zero  order  hold)  ZT/n{G(s )}  can  be  computed  by  the 
single  rate  z  plane  transform  command  SZXFM  with  the  appropriate  value  for  the  sampling  period. 
For  multirate  systems  with  a  zero-order  hold  associated  with  G(S),  the  period  of  the  zero-order 
hold  will  be  at  the  slower  rate.  Thus,  if  G(s)  is  equal  to  a  zero-order  hold  in  cascade  with  Gj(s), 
the  transfer  function  between  Et(z)  to  the  output  of  G\(s)  at  the  faster  sampling  rate  is  given  by 

GTJn(zn)  =  ZTI'\^—  Gi(*)}  =  G1(s)}  (C.31) 

s  s 

This  transfer  function  can  be  computed  in  two  steps  by  (1)  using  command  SZXFM  on  the  con¬ 
tinuous  function  Gi(s)/s  with  the  sampling  period  set  to  T/n  and  (2)  multiplying  the  results  by 
(1  -  z"n).  However,  to  simplify  the  number  of  operations  for  the  user,  the  z  plane  multirate  com¬ 
mand  SZMRX  will  perform  these  two  steps  automatically  for  the  user.  An  equivalent  w  plane 
version  of  this  command  is  SWMRX. 

The  second  type  of  multirate  transform  is  a  z  variable  change  command  to  allow  a  GT(z)  transfer 
function  at  a  slower  rate  to  be  changed  to  a  faster  rate  representation,  GT/,n(z£).  The  command 
which  implements  this  transform  is  ZVCNG.  See  example  in  the  Reference  for  ZVCNG  in  Appendix 
A. 

The  third  type  of  multirate  transform  is  the  fast-to-slow  multirate  transform  which  describes  the 
system  shown  in  Figure  C.3. 

If  CT!n{zn)  is  resampled  (skip  sampled)  at  n  times  slower,  the  transform  CT{z )  is  given  by 

cr(,)  =  i"fcr'*(v‘!f!)  (C.32) 

n  f — ' 
k—0 

This  multirate  relationship  is  implemented  in  LCAP2  by  two  different  methods.  The  first  is  a 
multirate  frequency  response  method1  which  evaluates  the  response  directly  from  (C.32)  using 

'Implemented  by  commands  ZMRFQ  and  WMRFQ 
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Figure  C.3:  Fast-to-Slow  Multirate  System 

shifted  values  of  zn.  This  method  will  yield  an  accurate  response  but  does  not  lend  itself  to  a  block 
diagram  reduction  analysis.  The  second  method  involves  the  evaluation  of  CT(z)  in  rational  form 
as  a  function  of  z.  The  poles  of  CT(z)  will  be  equal  to  the  poles  of  CT/n(zn)  raised  to  the  n -th  power 
since  z  =  z”.  The  numerator  roots  of  CT(z),  however,  are  not  simply  related  to  the  numerators  of 
CT!n(zn).  At  the  present  time,  these  numerator  roots  are  solved  for  by  casting  the  problem  into  a 
generalized  root  finding  problem  using  the  MULE  root  finding  subroutine.  This  particular  method 
for  finding  the  numerator  roots  only  works  well  for  systems  which  are  not  too  large.  The  accuracy  in 
computing  the  rationalized  form  of  (C.32)  can  be  determined  by  evaluating  the  frequency  response 
of  the  resulting  transfer  function  and  comparing  it  with  the  frequency  response  computed  by  using 
the  ZMRFQ  or  WMRFQ  commands. 

C.7  Root  Classification 

In  Chapter  6  the  format  used  in  LCAP2  for  representing  polynomials  and  transfer  functions  in  root 
form  was  given.  To  summarize,  (1)  the  real  part  of  element  one  of  a  complex  array  is  used  to  store 
the  number  of  roots,  (2)  the  imaginary  part  of  element  one  of  a  complex  array  is  used  to  store 
the  nonzero  coefficient  of  the  polynomial,  and  (3)  the  roots  are  stored  in  consecutive  elements  of  a 
complex  array  starting  in  element  two.  For  the  user,  there  is  no  constraint  on  the  ordering  of  the 
roots  when  the  data  is  entered  except  that  a  complex  pair  must  be  entered  in  consecutive  locations. 
Once  the  data  is  entered,  the  roots  are  ordered  so  that  a  systematic  development  of  routines  utilizing 
root  arrays  can  be  implemented.  The  roots  within  the  array  are  ordered  as  follows:  complex,  real 
(nonzero),  and  zero.  After  the  user  enters  in  a  set  of  roots,  the  program  will  automatically  order 
the  roots  into  this  format  using  subroutine  RCLAS. 

RCLAS  is  also  used  after  roots  and  eigenvalues  are  found.  In  addition  to  ordering  the  roots,  RCLAS 
will  check  the  roots  to  (1)  zero  out  any  negligible  real  or  imaginary  parts  of  a  root,  (2)  set  any 
negligible  roots  to  zero,  and  (3)  print  out  an  error  message  when  complex  roots  do  not  exist  in 
conjugate  pairs.  These  operations  on  the  roots  tend  to  compensate  for  small  errors  introduced 
by  the  root  finding  routine  by  “forcing”  roots  to  values  which  are  more  representative  of  physical 
systems.  When  computations  such  as  partial  fraction  expansion  and  computation  of  polynomial 
coefficients  from  it  factored  form  are  performed,  errors  will  be  minimized  when  the  roots  have  been 
“processed”  by  RCLAS. 

The  criteria  for  the  operations  described  above  are  given  below.  For  the  root  array  x^,  i  =  l,n 
execute  steps  1  through  8  for  each  value  of  i. 

1.  Determination  of  Noncomplex  Root 

If  imag(xi)  =  0  the  root  is  noncomplex,  go  to  step  7;  otherwise  go  to  step  2. 
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2.  Determination  of  Complex  Root 

If  |real(xi)/imag(x,)|  <  ERCX  (preset  to  1.E4),  the  root  is  complex,  go  to  step  4;  otherwise 
go  to  step  3. 

3.  Set  Negligible  Imaginary  Part  to  Zero 
x,  =  real(xj)  +  jO,  go  to  step  7. 

4.  Determination  of  Root  on  the  Imaginary  Axis 

If  real(x;)  —  0,  go  to  step  8;  otherwise  go  to  step  5. 

5.  Determination  If  Real  Part  Is  Negligible 

If  !imag(x{)/real(xi)|  >  ERCX,  the  real  part  if.  negligible,  go  to  step  6;  otherwise  go  to  step  8. 

6.  Set  Negligible  Real  Part  to  Zero 
Xj  =  0  -f  j  imag(xj),  go  to  step  8. 

7.  Move  Noncomplex  Roots  to  the  End  of  the  Array 
temp  =  x, 

Xj  =  Xj+i,  j=l,n-l  where  n  =  number  of  roots  in  the  array 
xn  —  temp 

8.  Continue 

For  the  complex  roots  found  in  steps  1  through  7,  which  are  now  in  the  first  part  of  the 
array,  execute  steps  9  and  10  for  i  =  1,3,... ,(1^-1)  where  nc  is  the  number  of  complex  roots. 

9.  Verify  that  x,  and  x1+1  are  Conjugate  Pairs 

For  i  odd,  if  |  |  <  ERCNJ  and  if  I  ■mng(*0+»'"»°g(»<t1)  |  <  ERCNJ, 

and  x,+1  are  conjugate  pairs,  go  to  step  11;  otherwise  go  to  step  10. 

(ERCNJ  is  preset  to  l.E-4). 

10.  Search  for  Conjugate  of  Xi 

if  an  Xj  can  be  found  such  that 

|  rea^-rga^  I  <  ERCNJ  and  I  I  <  ERCNJ 

Xj 

where  i  <  j  <  nc,  interchange  Xj  with  x^+i.  If  the  conjugate  of  X*  is  not  found  an  error 
message  will  be  printed  out.  Since  an  error  in  the  complex  roots  will  not  necessarily  result  in 
erroneous  results  for  all  subsequent  LCAP2  operations,  the  program  is  allowed  to  continue. 
The  user  should  check  to  determine  if  the  missing  complex  conjugate  root(s)  is  due  to  an 
input  error  in  loading  roots. 

11.  For  the  remaining  noncomplex  roots  the  roots  at  the  origin  are  found  and  moved  to  the  end 
of  the  array.  For  i  =  (nc  +  l),n  execute  steps  12  through  14. 

12.  Determine  Roots  at  the  Origin 

If  |xj|  <  ERCZ  (preset=l.E-5),  the  root  is  zero  or  negligible,  go  to  step  13;  otherwise  go  to 
step  14. 

13.  Move  Roots  at  the  Origin  to  the  End  of  the  Array 

Xj  =  Xj+X,  j  =  1, n-1 
xn  -  (0.,0.) 

14.  Continue 
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C.8  Common  Root  Elimination 


In  the  analysis  of  systems,  quite  often  common  roots  occur  between  the  numerator  and  denominator 
of  transfer  functions,  particularly  when  transfer  functions  are  evaluated  by  Cramer’s  method.  Since 
these  common  roots  are  generally  not  identically  equal,  subsequent  computations  using  the  roots 
of  the  transfer  function  without  first  eliminating  them  will  introduce  errors.  Subroutine  CRELIM 
is  used  to  determine  and  eliminate  common  roots  from  transfer  functions.  The  criteria  for  common 
roots  are: 

If  a  numerator  root  a,  and  a  denominator  root  bj  of  a  transfer  function  are  found  such  that, 

|  —  -  (1  +  j'O)  |<  ECREl  for  a;  /  0  (C.33) 

di 

or 

|  bj  |<  ECRE2  for  a,  =  0  (C.34) 

and  bj  are  considered  to  be  common  roots  and  will  be  eliminated  from  the  transfer  function. 
ECREl  is  defined  as  the  CRELIM  nonzero  common  root  criterion  and  ECRE2  is  defined  as  the 
CRELIM  zero  root  criterion.  The  preset  values  for  these  parameters  are: 

ECREl  =  2.E-4 
ECRE2  =  l.E-8 

The  user,  however,  can  change  these  values. 
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Appendix  D 


Changes  Affecting  Users  of  Previous 
Versions  of  LCAP2 


In  developing  this  version  of  LCAP2  emphasis  was  placed  on  upward  compatibility  with  the  previ¬ 
ous  version  of  the  program.  The  names  and  usage  of  the  LCAP2  commands  and  parameters  were 
retained  as  much  as  possible.  However,  several  factors  influenced  the  decision  to  make  some  fun¬ 
damental  changes  to  the  program.  They  included  (1)  code  conversion  from  FORTRAN  66  (CDC 
FTN4)  to  FORTRAN  77  (CDC  FTN5  and  CRAY  CFT),  (2)  renaming  or  redefining  of  some  LCAP2 
commands  and  parameters  for  more  consistent  usage,  and  (3)  portability  of  LCAP2  source  code 
for  different  size  versions  of  the  program. 


D.l  Changes  Related  to  Conversion  from  FORTRAN  66  to  77 


In  the  previous  version  of  the  program,  text  data,  such  as  labeling  of  plot  titles,  was  done  with  the 
use  of  REAL  variables  which  were  set  equal  to  Hollerith  characters.  This  was  not  a  very  convenient 
method  for  handling  text  data,  but  that  was  all  that  was  available  with  FORTRAN  66.  Since  the 
FORTRAN  77  language  defines  CHARACTER  variables  for  handling  text  data,  all  REAL  variables 
for  text  data  in  the  old  version  were  changed  to  CHARACTER  variables  where  feasible. 

In  the  old  version  the  labeled  common  block, 


COMMON/HEADDB/HEAD(70),DB(900) 


was  replaced  by  four  common  blocks,  HEAD,  DBASE,  POLYCM,  and  ROOTCM. 
For  CDC,  common  block  HEAD  is, 


COMMON/HEAD/HEAD 

CHARACTER*70  HEAD(5),TITLEl,TITLE2,TITLE3,TITLE4,SAVLBL 
EQUIVALENCE  (HEAD(l),TITLEl),(HEAD(2),TITLE2),(HEAD(3),TITLE3) 
+  ,(HEAD(4),TITLE4),(HEAD(5),SAVLBL) 
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For  CRAY,  common  block  HEAD  is, 


COMMON/HEAD/HEAD 

CHARACTER*64  HEAD(5),TITLEl,TITLE2,TITLE3,TITLE4,SAVLBL 
EQUIVALENCE  (HEAD(l),TITLEl),(HEAD(2),TITLE2),(HEAD(3),TITLE3) 
+,(HEAD(4),TITLE4),(HEAD(5),SAVLBL) 

For  both  CDC  and  CRAY,  the  common  block  DBASE  is, 

COMMON /DBASE/DB(300) 

For  both  CDC  and  CRAY,  the  common  block  POLYCM  is, 

DIMENSION  POLYP(MXPDEG+2),POLYN(MXPDEG+2),POLYD(MXPDEG+2) 
COMMON /POLYCM/POLYP,POLYN,POLYD 

For  both  CDC  and  CRAY,  the  common  block  ROOTCM  is, 

COMPLEX  ROOTP(MXPDEG+l),ROOTN(MXPDEG  +  l),ROOTD(MXPDEG  +  l) 
COMMON /ROOTCM/ROOTP,ROOTN,ROOTD 

Common  block  HEADDB  was  replaced  by  four  common  blocks  for  the  following  reasons: 

•  Common  block  HEAD  for  CHARACTER  variables  had  to  be  defined  separately  since  CHAR¬ 
ACTER  and  REAL  variables  cannot  be  mixed  in  the  same  common  block. 

•  REAL  variables  equivalenced  to  array  DB  were  unchanged  if  they  are  not  a  function  of  the 
FORTRAN  parameter  MXPDEG,  which  is  the  maximum  polynomial  degree  for  a  particular 
version  of  LCAP2. 

•  Arrays  POLYP,  POLYN,  and  POLYD  used  to  enter  polynomial  coefficient  data,  which  was  in 
common  block  HEADDB,  is  now  defined  in  common  block  POLYCM  since  their  dimensions 
are  a  function  of  the  FORTRAN  parameter  MXPDEG. 

•  Arrays  ROOTP,  ROOTN,  and  ROOTD  used  to  enter  polynomial  root  data,  which  was  in 
common  block  HEADDB,  is  now  defined  in  common  block  ROOTCM  since  their  dimensions 
are  a  function  of  the  FORTRAN  parameter  MXPDEG. 


For  labeling  both  low  resolution  printer  plots  and  the  high  resolution  electrostatic  plots,  the  CHAR¬ 
ACTER  variable  TITLEl  is  used  for  the  title  of  the  plot,  i.e., 


TITLE1  = ’EXAMPLE  1  S  PLANE  FREQUENCY  RESPONSE’ 

For  labeling  the  high  resolution  plots,  the  following  CHARACTER  variables,  TITLE2,  TITLE3, 
and  TITLE4,  can  be  used  for  additional  lines  of  annotation  on  lines  2,  3,  and  4,  respectively. 

The  subroutines  HEADINi,  (i=l,5),  used  in  the  previous  versions  of  LCAP2  for  labeling  plots  are 
no  longer  available. 
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The  array  DB  is  used  to  define  memory  allocation  for  LCAP2  parameters.  In  routines  whicli  use 
these  parameters,  appropriate  equivalence  statements  must  be  declared.  Even  though  the  dimension 
of  DB  has  been  reduced  to  300  in  common  block  DBASE,  only  five  array  parameters  were  affected 
bv  the  conversion  to  FORTRAN  77.  They  are  the  arrays  FREQi,  i=l,5.  They  were  formerly 
equivalenced  to  DB(i),  i=698,  701,  704,  707,  710.  They  should  now  be  equivalenced  to  DB(i),  i=l, 
4,  7,  10,  13. 

D.2  Renaming  of  LCAP2  Commands 

Changes  were  made  to  the  following  LCAP2  commands.  The  changes  were  either  to  the  name 
or  else  to  the  number  of  arguments.  Only  the  FORTRAN  form  (not  its  PRECMP  form)  is  given 
below. 

•  RESTORE(IPRNFLG)  ->  L  O  AD  (’file  Jiame' \iprn) 

•  STORE(IPRNFLG)  ->  SAVE(’file_name,,iprn) 

•  WMRFQ(I,M)  -»  WMFRQ(i) 

•  ZMRFQ(I,M)  -  ZMFRQ(i) 

D.3  Renaming  of  LCAP2  Parameters 

The  following  LCAP2  parameters  were  renamed.  In  most  cases  the  new  name  will  either  be  easier 
to  remember  or  else  better  reflect  the  function  that  it  represents. 

•  FDLAY  FDELAY 

•  FILM  -»  HRDCPY 

•  FXYDL  -  FXYDEL 

•  FXYMN  -4  FXYMIN 

•  MNDW  -*  MINDW 

•  MXDW  -*  MAXDW 

•  MXITF  -»  MAXITF 

•  NOMEG  —  NOMEGA 

•  N  TMFG  -»  NRMHI 

•  POLY  -4  POLYP 

•  ROOT  -  ROOTP 

•  RLXMN  —  RLXMIN 
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•  RLXMX  -  RLXMAX 


•  RLYMN  -»  RLYMIN 

•  RLYMX  -  RLYMAX 

•  TSTEP  —  TTYPE 


D.4  Changes  to  Deck  Setup  for  Creating  the  Main  Program  Us¬ 
ing  UPDATE 


In  the  old  version  the  main  program  was  created  for  the  user  with  the  following  UPDATE  directives: 


♦IDENT  identifier 
♦INSERT  START. 1 
♦DECK  MAIN 
♦CALL  LCAP2 

CALL  INITO 
CALL  MINITO 


In  the  new  version  the  following  UPDATE  directives  are  used, 


♦IDENT  identifier 
♦INSERT  START. 1 

PROGRAH  LCAP2 ( INPUT , OUPUT , TAPE5=INPUT , TAPE6=0UTPUT) 
♦CALL  C0MLCAP2 
CALL  INITO 
CALL  HINITO 


In  the  deck  setup  for  the  old  version  of  the  program,  COMDECK  LCAP2  includes  the  program 
statement  and  many  lines  of  common  block  and  equivalence  statements  used  for  creating  the  first 
part  of  the  users  main  program.  For  users  who  are  not  familar  with  UPDATE,  this  setup  was 
probably  confusing  since  the  COMDECK  and  the  main  program  being  created  were  both  called 
LCAP2.  For  the  new  version  of  LCAP2,  the  user  must  explicitly  define  the  program  statement.  The 

♦  CALL  COMLCAP2  directive  will  insert  many  different  sets  of  common  blocks  and  equivalence 
statements  after  the  program  statement.  Whereas  the  common  block  and  equivalence  statements 
in  COMDECK  LCAP2  in  the  old  version  were  actual  source  code,  the  statements  in  COMDECK 
COMLCAP2  for  use  in  the  new  version  are  ♦CALL  statements  to  other  COMDECKs  which  contain 
the  actual  source  code  for  the  common  block  and  equivalence  statements.  In  addition  to  simplifying 
the  maintenance  of  libraries  of  common  decks  used  by  LCAP2,  the  ♦CALL  directives  in  COMDECK 
COMLCAP2  should  encourage  the  user  to  make  use  of  several  COMDECKs  when  user  subroutines 
are  being  written  for  more  complex  analysis.  COMDECK  COMLCAP2  consist  of  the  following 

♦  CALL  directives: 
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♦CALL  SETMXP 
♦CALL  FRQBLK 
♦CALL  PL0T1 
♦  CALL  .•  •  JCTI. 
♦CALL  TERMNL 
♦CALL  TFPCNT 
♦CALL  TFTEMP 
♦CALL  DBASE 
♦CALL  DBEQUIV 
♦CALL  HEAD 
♦CALL  POLYCM 
♦CALL  ROOTCM 
♦CALL  INTCOM 
♦CALL  MATRIX1 
♦CALL  MDET1 
♦CALL  SCMBLK 
♦CALL  CMPOLY 
♦CALL  SETB1 
♦CALL  SETB2 
♦CALL  IYCDS 


When  a  user  writes  his  or  her  own  subroutines  which  use  LCAP2  parameters,  (1)  the  common 
blocks  HEAD,  DBASE,  POLYCM,  and  ROOTCM  must  be  declared  and  (2)  LCAP2  parameters 
which  are  not  in  common  blocks  POLYCM  and  ROOTCM  must  be  equivalenced  to  the  appropriate 
elements  of  the  array  DB  in  common  block  DBASE.  This  can  be  easily  be  done  with  the  use  of  the 
following  UPDATE  directives: 


♦CALL  SETMXP 
♦CALL  DBASE 
♦CALL  DBEQUIV 
♦CALL  HEAD 
♦CALL  POLYCM 
♦CALL  ROOTCM 


The  +CALL  SETMXP  directive  will  insert  the  FORTRAN  PARAMETER  statement  declaring  the 
value  of  MXPDEG. 
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Appendix  E 


Notes  on  Creating  Plots 


Both  low  resolution  printer  plots  and  high  resolution  electrostatic  plots  can  be  generated  whenever 
a  frequency  response,  time  response,  or  root  locus  command  is  invoked.  The  low  resolution  plot 
is  created  if  the  value  of  the  LCAP2  parameter  GRAFP  is  nonzero.  The  high  resolution  plot  is 
created  if  the  value  of  the  LCAP2  parameter  HRDCPY  is  a  nonzero.  The  following  are  notes  on 
creating  plots. 


E.l  Plot  Labels 

The  CHARACTER  variables  TITLEl,  TITLE2,  TITLE3,  and  TITLE4  in  common  block  HEAD 
are  used  for  labeling  plots.  Each  of  these  variables  corresponds  to  one  line  of  annotation.  TITLEl 
is  used  by  both  the  low  resolution  and  high  resolution  plots.  TITLE2,  TITLE3,  and  TITLE4  are 
used  only  by  the  high  resolution  plots  and  are  not  available  for  low  resolution  plots.  TITLEl  is 
always  positioned  at  the  top  of  a  plot.  Title  data  is  entered  using  a  character  expression,  i.e., 

TITLE 1=' FREQ.  RESPONSE  FOR  FLEX  M0DE=  1.20,  ZETA=  .005’ 

Character  substring  reference  can  be  used  to  change  part  of  a  CHARACTER  variable.  For  example, 
to  change  the  value  of  flex  mode  and  zeta  in  variable  TITLEl  above,  to  4.50  and  .008,  respectively, 
the  following  statements  can  be  used, 

TITLE(30 : 35)=  ’  4.50’ 

TITLE(43:47)=*  .008’ 

Another  method  of  changing  a  substring  of  a  CHARACTER  variable  is  to  use  an  internal  write 
statement.  For  example,  if  five  different  frequency  response  plots  are  to  be  made  with  different  sets 
of  flexible  mode  frequency  and  damping  coefficients,  the  following  code  can  be  used  to  automatically 
annotate  the  plot  title: 

TITLE1= ’FREQ .  RESPONSE  FOR  FLEX  H0DE=  ,  ZETA= 

DO  100  1=1,5 
C 
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WFLEX  =  . . . 

WZETA  =  . . . 

C 

C  "compute  transfer  function  and  store  in  SPTF10" 

WRITE(TITLE1 (30 : 35) . ' (F6 . 2) ’ ) WFLEX 
WRITE(TITLE1(43: 37) , ’ (F5 . 3) * ) WZETA 
C 

C  "enter  frequency  response  parameters" 

C 

100  CALL  SFREQ(IO) 

For  high  resolution  plots,  additional  lines  of  annotation  are  entered  with  the  variables  TITLE2, 
TITLE3,  and  TITLE4.  The  actual  number  of  lines  generated  on  a  plot  is  determined  by  the 
parameter  NANOT  (preset  to  4)  which  can  be  0  -  4.  This  parameter  was  defined  to  allow  the  user 
to  suppress  plot  annotation  without  having  to  set  a  title  variable  to  a  blank  word1. 

The  second,  third,  and  fourth  line  of  annotation  normally  begins  just  below  the  title  at  the  top  of 
the  plot.  The  start  of  the  second  line  of  annotation  is  controlled  by  the  value  of  parameter  YANOT 
(preset  to  9.6  inches).  If  pertinent  plot  data  is  located  near  the  top  of  the  plot,  the  additional  lines 
of  annotation  can  be  moved  to  the  lower  part  of  the  plot  be  setting  YANOT  to  a  smaller  value 
(range  =  0-10  inches). 


E.2  Low  Resolution  Printer  Plots 

The  default  settings  for  the  size  of  the  printer  plot  is  52  rows  high  and  103  characters  wide.  The 
parameter  which  controls  the  height  is  XLINES.  The  parameter  which  controls  the  width  is  XNCOL 
which  can  be  either  73  or  103.  (The  printer  plots  for  the  examples  in  Chapter  8  were  generated 
using  XLINES  =  43  and  XNCOL  =  73.)  Multiple  plots  (overlays)  cannot  be  produced  on  printer 
plots. 

E.3  High  Resolution  Plots 


The  size  of  the  high  resolution  plots  cannot  be  changed  by  the  user.  The  low  level  Aerospace 
plot  routines  are  used  to  create  the  plots  in  LCAP2.  The  printer  units  used  by  the  Aerospace 
plot  routines  are  in  inches  when  used  with  a  pen  plotter.  When  used  with  a  Versatec  electrostatic 
printer,  a  nominal  10x17  inch  size  pen  plot  is  scaled  to  fit  on  an  8  1/2  x  11  paper.  An  inch  in 
printer  units  on  a  electrostatic  plot  is  thus  approximately  0.59  inches. 


E.3.1  Multiple  Plots 

The  default  mode  for  plotting  the  high  resolution  plots  is  one  curve  per  plot.  For  commands  which 
generate  only  one  plot  per  command2,  the  frame  advance  for  plots  can  be  inhibited  so  that  multiple 

*A  CHARACTER  variable  can  be  set  to  a  blank  string  as  follows,  i.e.,  TITLE4=’  ’ 

2Examples  are:  (1)  STIME,  (2)  ZTIME,  or  (3)  any  frequency  response  command  with  only  the  FN1CO  or  FNYQS 
option.  The  FBODE  option  cannot  be  used  for  multiple  plots  since  it  will  create  two  plots  per  command. 
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curves  can  be  produced  on  a  single  plot.  Thus,  to  plot  n  curves  on  a  plot,  n  commands  must  be 
specified  with  the  appropriate  parameter  for  controlling  the  frame  advance.  This  parameter  is 
CONTP  which  is  preset  to  0.  This  parameter  is  defined  as: 


CONTP  -  0 
CONTP  =  1 
CONTP  =  2 
CONTP  =  3 


Single  curve  plot 
First  curve  of  a  plot 
Continuation  of  a  plot 
Final  curve  of  a  plot 


When  a  plot  with  multiple  curves  is  to  be  generated,  the  first  command  must  be  made  with 
CONTP  =  l.  This  will  inhibit  the  frame  advance  in  addition  to  creating  the  grid,  axis,  annotations, 
and  the  first  curve.  For  subsequent  curves,  but  not  the  final  curve,  the  value  of  CONTP  must  be 
set  to  2.  The  final  curve  is  to  be  made  with  CONTP  =  3  which  will  reset  the  inhibit  of  the  frame 
advance.  An  example  for  creating  a  multiple  plot  for  frequency  responses  contained  in  SPTF4, 
SPTF5,  SPTF6,  SPTF7,  and  SPTFg  is  given  below: 


FB0DE=O  ”no  Bode  plot” 

FNYQS=0  ”no  Nyquist  plot” 

FHIC0=1  "only  Nichols  plot” 

DO  100  1=4,8 
C0HTP=2 

if(i  .  eq  .  4)coirrp=i 
IF (I . EQ . 8) C0NTP=3 
100  CALL  SFREQ(I) 


E.3.2  Intensity  and  Zero  Line 

The  intensity  of  a  curve  drawn  on  a  plot  can  be  controlled  by  the  parameter  SHADE  which  is 
defined  from  2  to  28,  with  28  being  the  darkest.  The  preset  value  of  SHADE  is  16.  The  intensity 
level  can  be  changed  when  making  multiple  curve  plots  so  that  the  curves  can  be  differentiated. 

To  improve  the  appearance  of  plots  there  is  a  provision  to  darken  the  grid  lines  when  the  horizontal 
or  vertical  scale  changes  sign.  The  intensity  for  the  zero  line  is  specified  by  the  parameter  ZL1NE 
(preset  to  19). 

E.3.3  “Pen”  Pickup 

The  high  resolution  frequency  and  time  response  plots  are  created  by  connecting  a  series  of  response 
points  by  straight  lines.  Even  though  the  responses  may  be  evaluated  with  sufficiently  small 
increments  to  allow  a  smooth  curve  to  be  plotted,  the  user’s  choice  for  the  plot  scale  or  the  nature 
of  the  plot  may  still  produce  discontinuities.  The  most  obvious  example  is  the  Nichols  plot  in 
which  the  phase  is  cyclic.  To  avoid  a  wraparound  the  “pen”  must  be  picked  up  when  it  reaches  one 
end  of  the  axis  and  continues  on  the  opposite  end.  The  parameters  XGAP  and  YGAP  are  used 
to  determine  when  points  are  not  to  be  connected.  When  the  delta  change  in  either  the  x  or  y 
direction  of  the  data  to  be  plotted  exceeds  XGAP  or  YGAP  (in  0.01  printer  inch  units)  the  points 


E  -  3 


are  not  connected.  XGAP  and  YGAP  are  preset  to  500 
length  in  the  y  direction.  When  points  are  not  connecte< 


ich  corresponds 
e  points  are  mai 


to  one  half  of  the  pi 
rked  with  a  small  be 


lIn  the  previous  versions  of  LCAP2,  XGAP  and  YGAP  were  preset  to  50. 
be  drawn  when  the  points  were  more  than  0.5  p.inter  inch  units  apart. 


This  caused  discontinuous  curve 
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Appendix  F 


Line  Printer 


Output  Suppression 


There  is  a  provision  to  suppress  all  or  a  portion  of  the  output  generated  by  the  line  printer.  This 
feature  can  be  used  to  eliminate  the  printout  of  intermediate  results  once  the  program  has  been 
checked  out.  Flags  PRNFLGi,  i=l,5  in  common  block  PRNCTL  are  defined  for  suppressing  the 
output.  At  the  present  time  only  PRNFLG2,  PRNFLG3,  and  PRNFLG4  (all  preset  to  1)  are  used. 
The  printer  output  from  an  LCAP2  command  generally  can  be  separated  into  three  parts,  (1)  input 
polynomial  or  transfer  function  arguments,  (2)  summary  of  the  LCAP2  command,  and  (3)  output 
polynomial  or  transfer  function  computed  or  computation  of  frequency  response,  time  response,  or 
root  locus.  The  printer  output  for  these  three  parts  can  be  controlled  by  PRNFLG2,  PRNFLG3, 
and  PRNFLG4,  respectively.  The  output  is  suppressed  if  these  parameters  are  set  to  0.  These  flags 
can  be  changed  during  a  rim  so  that  selected  output  can  be  generated. 

As  as  example,  the  command  “CALL  PLDC”  in  Example  2  in  Chapter  8  generated  the  following 
output: 


DEGREE  OF  POLYP  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

34.  38.  13.  1. 

************************************************************ 

*  PLDC  -  POLYNOMIAL  LOAD  IN  COEFFICIENT  FORM  * 

************************************************************ 

DEGREE  OF  P0LY1  IS  3  (COEFFICIENTS  IN  ASCENDING  ORDER) 

34.  38.  13.  1. 


I _ I 

If  PRNFLG2=0  polynomial  POLYP  would  not  have  been  printed  out.  If  PRNFLG3=0,  both  (l)  the 
summary  of  the  PLDC  command,  enclosed  by  the  asterisk  box,  and  (2)  the  dashed  line  designating 
the  end  of  a  command,  would  not  have  been  printed  out.  If  PRNFLG4=0,  the  polynomial  POLYl 
would  not  have  been  printed  out. 
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Appendix  G 


Reserved  Files  for  LCAP2 


This  appendix  lists  the  files  used  by  LCAP2.  These  files  should  not  be  used  by  the  typical  user 
when  developing  an  LCAP2  analysis  program. 


Table  G.l:  Reserved  Files  For  LCAP2 


tapejiame 

Description 

TAPE19 

Scratch  file  for  storing  roots  computed  by  BlLOCI  and  B2LOCI 

TAPE29 

Scratch  file  used  by  interactive  command  CDCFILE 

TAPE30 

Scratch  file  used  by  command  LOAD 

TAPE31 

Scratch  file  used  by  command  SAVE 

TAPE32 

Scratch  file  used  by  command  BlLOAD 

TAPE33 

Scratch  file  used  by  command  BlSAVE 

TAPE35 

Scratch  file  used  by  commands  BlSAVE  and  BlLOAD 

TAPE50 

File  used  by  CDC  PRECMP 

TAPE83 

File  used  for  saving  matrix  data  in  interactive  LCAP2 

TAPE84 

Direct  access  file  for  storing  POLY;  arrays 

TAPE85 

Direct  access  file  for  storing  SPTF;  arrays 

TAPE86 

Direct  access  file  for  storing  WPTFj  arrays 

TAPE87 

Direct  access  file  for  storing  ZPTFj  arrays 

TAPE89 

File  for  storing  counter  NPLOTS  in  interactive  LCAP2 

G  -  1 


Appendix  H 


Hardcopy  Plots  for  the  Examples 
from  Chapters  8  and  9 
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EXAMPLE  1  5  PLANE  FREQUENCY  RESPONSE 
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EXAMPLE  5  INVERSE  L A p L A C E  TRANSFORM  AND  TIME  RESPONSE 
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EXAMPLE  7  INVERSE  Z  TRANSFORM  AND  TIME  RESPONSE 
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EXAMPLE  9  MULTIRATE  FREQUENCY  RESPONSE  BY  FREQUENCY  DECOMPOSITION 
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MPLE  CONTINUOUS  MODEL 
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EXRMPLE  17.  IEEE  BENCHMARK,  SIMPLE  CONTINUOUS  MODEL 
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EXAMPLE  18,  IEEE  BENCHMARK  NO.  3,  2-RATE  MODEL 
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Appendix  I 


Program  Availability 


The  source  code  for  this  program  is  available  to  agencies  supporting  DOD  projects  and  studies.  The 
requestor,  however,  should  be  aware  that  some  non  ANSI  FORTRAN  77  code  are  used.  Installation 
on  computers  other  than  the  CDC  176  or  the  CRAY  XMP-14  will  require  some  modifications.  The 
following  facts  will  be  of  interest  if  modifications  are  to  be  made: 

1.  The  code  was  developed  and  modified  extensively  over  a  number  of  years.  In  many  cases  the 
code  consists  of  a  series  of  patches  which  could  be  cleaned  up  to  improve  both  efficiency  and 
readability.  Unless  significant  improvements  in  execution  time  or  in  accuracy  can  be  made, 
there  are  no  immediate  plans  to  do  so. 

2.  The  interactive  (CDC)  and  batch  version  code  share  many  of  the  same  routines.  Since 
Interactive  LCAP2  runs  on  the  CDC  INTERCOM  within  a  constraint  of  230K  SCM  (small 
core  memory),  the  segment  loader  was  used.  Since  available  memory  in  Interactive  LCAP2 
was  already  tight  before  the  automated  analysis  method  using  transfer  function  connection 
blocks  was  implemented,  subsequent  code  development  had  to  be  “shoe-horned”  in  to  fit  into 
the  230K  SCM.  This,  of  course,  increased  the  complexity  of  the  code.  Non  ANSI  FORTRAN 
LEVEL  2  LCM  (large  core  memory)  code  was  used  in  some  routines  to  enable  the  program 
to  stay  within  the  230K  SCM  limit.  When  the  batch  version  was  converted  to  the  CRAY 
these  LEVEL  2  variables  were  changed  to  regular  memory. 

3.  Evaluation  of  the  determinant  of  a  complex  matrix  is  written  in  assembly  language  in  the 
CDC  version.  This  can  be  replaced  with  code  from  LINPACK. 

4.  Hardcopy  graphics  routines  called  by  LCAP2  subroutines  are  in-house  system  routines  which 
will  not  be  included  as  part  of  the  source  code. 

This  program,  as  well  as  the  user’s  guide,  is  in  a  continuous  process  of  evolution  and  development. 
For  these  reasons,  this  program  and  related  materials  will  be  made  available  with  the  understanding 
that  no  warranty,  expressed  or  implied,  is  made  by  The  Aerospace  Corporation  as  to  the  accuracy 
and  functioning  of  the  program  and  related  materials  and  that  no  responsibility  for  program  main 
tenance  is  implied. 
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A  nominal  handling  fee  for  reproduction  and  handling  will  be  charged.  Request  for  a  copy  of  this 
program  should  be  addressed  to: 


Administrator 

Information  Processing  Division 
The  Aerospace  Corporation 
2350  E.  El  Segundo  Bivd. 

El  Segundo,  California  90245 
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